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Ya están aqui los dos últimos programas lanzados por 
Ultimate, la compafiia que lanzó entre otros el Sabre Wulf 
y Átic-Atac. 


Siéntete como Indiana Jones en el Templo Perdido o baja al 
más profundo de los infiernos para enfrentarte a la maldad 
de Lucifer. 


Los mejores gráficos logrados hasta ahora, la acción, ori- 
ginalidad, calidad y presentación de lujo, han hecho que 
estos juegos tengan las mejores críticas y mayores ventas 
que jamás hayan tenido programa alguno. 





KNIGHT LORE. P.V.P.: 2.900 Ptas. 





De vez en cuando aparecen algunos programas que de- 
muestran que las posibilidades del Spectrum son ina- 
gotables. 

Este es el caso de ATRAM, el primer gran juego de 
guerra que por primera vez combina los clásicos juegos 
de mesa con un programa de ordenador. 

Desde los tableros van siguiendo los movimientos de tu 
enemigo, mientras que con tu Spectrum vas controlando 
y estudiando tu táctica de ataque y defensa. 

Estrategia, habilidad y decisión son las claves del triunfo. 
De 2 a 4 jugadores. Apasionantes horas de juego. 


IEL MEJOR REGALO DE REYES! 
ATRAM. P.V.P.: 6.800 Ptas. 





jiPOR FIN! Un interruptor On/0ff y 
Reset para tu Spectrum, por sólo 
1.500 pesetas. 


— 
.. 


EE E sun 


Si no puedes venir a vernos, escríbenos a 
ERBE, PONZANO 25 - 28003 MADRID 


Go “q a e Ma Wa as Cu ” 
fa A Da Pa E Co es La tm 
o Se “a Es Ms 





o Illámanos al (91) 441 16 51 indicando 


Jos programas que desees. Los recibirás | No necesita ningún tipo de instalación. 
contra reembolso en tu domicílio SIN 


PAGAR GASTOS DE ENVIO. Basta con conectarlo. 


SERVIMOS A TIENDAS Y ALMACENES 
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EB PROGRAMAS DE LECTORES. tes itonasen sumos 
8 UTILIDADES. eia y almacenamiento de programas con velocidad variable. Tercera y 











CADA MES 
PONDREMOS 

À SU DISPOSICION 
UNA CINTA 

CON TODOS 

LOS PROGRAMAS 
PUBLICADOS 

EN LOS 

CUATRO 
NUMEROS 

DE DICHO MES. 


La primera cinta contendrá los 
programas publicados en los 
números del 1 al 4 inclusive; la 
segunda, los publicados en los 
números del 5 al 8, y asi 
sucesivamente 

EI precio es ecial de esta cinta 
es de 550 ptas., más 75 

pesetas por gastos de envio 
por correo certificado a su 
domicílio. 


E 


S/ NO QUIERE TECLEAR SUS PROGRAMAS, 
MICROHOBBY LOS GRABA POR USTED: 


SI VD. ESTA INTERESADO EN 
RECIBIRLA, ESCRIBA A 
HOBBY PRESS, S 

APARTADO AO DE MADRID, 
INDICANDO CLARAMENTE 
QUE MES COMPLETO DE 
PROGRAMAS DESEA RECIBIR 
EN CINTA E INCLUYENDO EN 
EL SOBRE UN TALON 
NOMINAL A NOMBRE DE 
HOBBY PRESS, S.A.. POR 
VALOR DE 625 PTAS,, O SI LO 
PREFIERE, EL RESGUARDO 
DEL GIRO POSTAL A TRAVES 
DEL CUL HA EFECTUADO SU 


ELIJA LA FORMULA 
QUE MAS 
LE CONVENGA! 


Cualquier consulta puede 
realizarla Ilamando a los tels.: 
733 50 12 - 733 50 16. 





OFERTA EXCEPCIONAL DE SUSCRIPCION, VALIDA SOLO HASTA EL 30 DE ENERO DE 1985 





AHORRE 850 PTAS. SOBRE 
EL PRECIO REGULAR DE 
SUSCRIPCION ;jUN 18% DE 
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DESCUENTO!! 

E “PRECIQREAL || PRECIO PARA vD. 
| AABBRTAS. 1, 3.900 PTAS. | 
ET SE 

- AHORRO 850 PTAS. 
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| 
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MICROHOBBY SEMANAL 
AHORA À SU ALCANCE itomo 
de ventagas !! 


CONSIGA UN REGALO SEGURO. 
Gratis para usted una de estas 


tres cintas de programas, cuyo 
precio en la calle es de 2.000 PTAS. 


;ELHJA LA QUE QUIERA! 








de esta oferta, sortearemos entre todos los cupones de suscripción recibidos 


UN ORDENADOR QL Y TRES MICRODRIVES CON SU INTERFACE: 


J PARTICIPE EN VALIOSOS SORTEOS. Cada mes, durante el período de validez 


4 premios valorados en más de 260.000 PTAS. 
;iCUANTO ANTES RESPONDA MAYORES SERAN SUS OPORTUNIDADES DE GANAR!! 


; ” $ k ; & e - 
e s s sa 4 + MARAMRBRBRNMRMA RB 





| | 
ASEGURESE HOY EL RE- | 
CIBIR, SEMANA TRAS | DEVUELVANOS SU, 
HOBBY. LA REVISTA | MISMO Y PARTICIPE ' 


MAS INNOVADORA Y EO QUE TENDRA | 


AGIL EN EL MUNDO DEL 
SPECTRUM. rate] 
| LA SEGUNDA 


| 
| 
| 
' NOTARIO DURANTE 
| SEMANA DE 

| FEBRERO DE 1985 

| 








PARA CUAL- 
QUIER CON- 
SULTA, LLAME- 
NOS A LOS 
TELS.: 733 50 12 
733 50 16 
O ESCRIBANOS O 
A HOBBY PRESS, 3.4. 
C/ Arzobispo Morcillo, 24. 
Of. 4. 28029 MADRID. 


SI LO DESEA, SOLICITE SU 
SUSCRIPCION POR TELEFONO. 
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EDITEXT (|) 


Jesús ALONSO RODRIGUEZ 


Una de las aplicaciones más interesantes de los 
ordenadores domésticos es el tratamiento de textos; y 
si hay un ordenador especialmente poco idóneo para 
esta aplicación, es sin duda el Spectrum; el tedado es 
lento, trabaja con sólo 32 columnas, y por si fuera 
oco, el BASIC interpretado es un lenguaje demasiado 
ento paru las tareas que ha de levar a cabo un editor 


de textos. 


En primer lugar, hay que conseguir 
aumentar el número de columnas en 
pantalla, para lo cual se genera un nue- 
vo juego de caracteres que permite 64 co- 
lumnas de impresión; a continuación se 
disenan algunas rutinas en código má- 
quina para desarrollar tareas en las que 
el BASIC resulta lento, tales como trans- 
ferencia de bloques, impresión de pan- 
tallas, etc.; y finalmente se escribe el res- 
to del programa en BASIC. El resultado 
es el Editor de textos que presentamos 
aqui con el titulo de EDITEXT. 


* Composición del programa 

El programa tiene dos partes funda- 
mentales; la primera es un editor de pá- 
gina en curso o página cero, que incor- 
pora una serie de facilidades tales como 
tabulación, párrafo adentrado, borrado 
de caracteres, ajuste automático de linea, 
caracteres espanoles, acentuado de voca- 
les, etc. 

La segunda parte del programa la 
componen una serie de rutinas que per- 
miten almacenar en memoria hasta 21 
páginas de texto, leer las páginas alma- 
cenadas, pasarlas a impresora, o alma- 
cenarlas en cintas de cassette. Para todo 
esto se utilizan cinco rutinas en código 
máquina; la primera no es preciso co- 


CONANDOS DEL EDITEKT 


COMANDOS EM MODO NORMAL = COMANDOS EM MODO EXT 
CAPS SNIFT + 2 = CRPS LOCK ; 4 = FIJAR TABULADORES 
CAPS SHIFT + O = BORRADO à q = BORRAR TABULADORES 
ENTER = NUEUR LIMER ; T = TABULADOR 
SINBOL SHIFT + 2 = : P = FIJA PRRRAFO ADENTRADO 
SINBOL SHIFT + E =N x 6 = BORRA PARRAFO ADENTRADO 
CAPS + SINBOL = MODO EXT. : ENTER = FIM DE PAGINA 

VOCAL = VOCAL ACENTUADA 


x x PULSE CURLQUIER TECLA PARA ENPEZAR = = 





mentarla ya que es ampliamente cono- 
cida por todos los usuarios del Spectrum; 
de las restantes se acompaifia el listado 
assembler con un gran número de co- 
mentarios que permitirán al lector enten-, 
der su funcionamiento. 

El manejo del Editor no es complica- 
do, después de la «carátula» aparece una 
página de instrucciones que recuerda los 
distintos comandos del editor de página 
en curso, aunque es más sencillo colocar 
sobre el teclado una plantilla como la que 
se adjunta. Las instrucciones están escri- 
tas sobre la página cero, por lo que se bo- 
rran al utilizar el editor; no obstante, si 
desea guardarlas, siempre puede transfe- 
rir la página en curso a la página 21 uti- 
lizando la opción 2 (observe la velo- 
cidad con que realiza la transfe- 
rencia, 29 
milisegun- 
dos); por 
lo demás, 
el pro- 
grama 
tiene la 
buena 
costum- 
bre de in- 
dicar lo que 
va haciendo 
y pedir los da- 
tos que necesite. 

La zona de ajuste 
corresponde a los últimos 
caracteres de la línea, se puede fijar 
entre uno y ocho, o cero si no se desea Hm 
ajuste automático, el programa emite una 
nota aguda para indicar que ha entrado 
en zona de ajuste, y que por tanto, la pul- 
sación de un guión (signo «menos») o un 
espacio, producirá un salto automático 
a nueva linea; CAPS SHIFT + 2 fija y 
libera las mayúsculas; CAPS SHIFT + 











(5 borra el último carácter de la línea en 
curso; SIMBOL SHIFT + 2 genera la 
n minúscula; SIMBOL SHIFT + 6 ge- 
nera la N mayúscula; ENTER salta a 
nueva línea; y CAPS SHIFT + SIM- 
BOL SHIFT pasan a modo extendido. 

Al situarse el teclado en modo exten- 
dido aparece la palabra EXT. en el án- 
gulo inferior derecho de la pantalla; en 
este modo puede usarse el tabulador, el 
párrafo adentrado, el final de página, y 
las vocales acentuadas. 


— Manejo del tabulador 

Para usar el tabulador habrá primero 
que fijar los topes de tabulación; pase a 
modo extendido y pulse la tecla «l»; se 
encuentra ahora en rutina de tabulado, 
ahora lleve el cursor hasta el primer pun- 


PROGRAMA | 


REM FrHIHHHRHErIELHHAE+ 
REM 

REM CARGADOR DE 
REM 


CODIGO MAQUINA 
PARA EDITEXT 


po) 

m 

x 
PETI cA. 
ode ge je je 


ESSAS 
CLEAR 3225 
LET bl=1 


RESTORE 1000: 
READ d,l 

IF d=z0 THEN GO TO 500 
LET a = “. 

FOR f=1i TO & 

READ b$ 

LET a$=as+bs 

NEXT f 

READ s 

80 GO SUB 200+100+(1=768) 
90 LET cs=0 

100 FOR n=d TO d+l-1 

118 o cdi n 

120 NEXT n 

IF cs<>s THEN GO TO 400 
LE di! dada 


STONE 
USUSUSSSSSVONCNALM- 


-2 
en): r 
4 


24 pa 


as 
n): LET aa=a- 
POKE d+n-769 


400 PRINT “ERROR EN BLOQUE “;bl 
;* REVISE DATAS” 

410 BEEP .5,0: PAUSE 100 

420 LIST blL+1000 

430 STOP 

S20 SAVE “cmCODE 32256, 1986 
510 SAVE “cmp”CODE 55216,292 
S20 PRINT "CINTA EN “PLAY” PARA 
VERIFICAR” 

S30 VERIFY "“cm"CODE 32256, 1986 
540 VERIFY “cmp"“CODE 65216,292 
SS0 CLS : PRI [ CORRECTO” * "HAG 
A “NEU' y TECLEE EL BASIC": STOP 


12000 REM BLOQUE - 

1905 DATA 32256,277 

1010 DATA OP SB7E232200SB6FSCC 
82600292929ED4B365C093E0532045B3 
AQGBSB3209SBI3ADASB' 

1020 DATA “320858B3E0932055B7E232 
202580732065B3A055SB3D20323A045SB3 
D20183ABESB473ADC' 

12030 DATA "SB4F3AGASBS10S20FC32A 
ASB2A0058BC3037E32045B3ADDSB473AQ 
958B8032095B2A025B'" 

19040 DATA "C3207E32055B3ADCSB473 
on nenaasana sons” CHODAAZECISRO 


Db 
85B3C320858B0520DD3 


R3ES 

CEEFF473ASDSCAD4 7" 
"2A085SBE6FS6F3AD7SBFEC 
29D01F1F1FE61F67CBICCBIDCEICCBIDC 
B0773A075B47E60 
188467781717E6E 
6FEB219C7E78E60Q 
SBCB462803B012C 


to que desee tabular utilizando la tecla 
espaciadora; para fijar la tabulación pul- 
se «T»; repita hasta un máximo de cua- 
tro topes de tabulación; cuando haya fi- 
jado el cuarto se producirá un retorno 
automático al inicio de línea y saldrá de 
la rutina de tabulado; si desea fijar me- 
nos de cuatro topes pulse ENTER para 
salir de la rutina de tabulado y retornar 
al modo normal; es posible que su tra- 
bajo habitual le obligue a utilizar más de 
cuatro topes de tabulado. Esperamos que 
no encuentre problemas en alterar las li- 
neas TÓID, 707Ó, TISÁ, T41D, 743 y 
8024; el array «t(4)» almacena los to- 
pes de tabulación entre O y 63, y la va- 
riable «ct» los subíndices del array 
«t(4)»); una vez fijados los topes de ta- 
bulación cada vez que pulse «Il» en mo- 


2005 DATA 32589,117 


10 DATA '"3E0DD72318083E02CD011 
621C2853E"” 
2020 DATA '"'C232365C3€7E325375C7EF 
EFF2S3C7E' 
22030 DATA “FEQD2SDEZEF6O0282AD73 
E08D7233E" 
2040 DATA “813237S5C7EFEFF28237EF 
EOD2SCS7E" 
2050 DATA “F6002815D723E5214288C 
1373FED42" 
22060 DATA "280CC5E1188D3E2018D23 
E2018€7C9' 

70 DATA "“1142F921C285018005SEDBE 
2C92142F9" 


9 
do DATA “11C285015005SEDBOCDS37 


2090 DATA 12577 

3200 REM BLOQUE 3 

3005 DATA 33474,768 

3010 DATA “BOBOOOOODLLLLD4DOARDA 
DODODLELELDAESCOZELDO9249006DSDB 
99024000000249885884284222248000R4 
RODOBDOLE4DO" 

32020 DATA "0000224 00000ED0000000 
D200D124S000EAARREDGO26A22200E22E 


BEGOEZ2E2EOOAREZ22200ESEZ2EOOCSSE 
REQ0E222220' 

3030 DATA "BEAREREOOERARE2Z2000400 
4000200224001248421000E90E0008421 
2480ER24S 04 006 OCAAADOERAERAGOCACA 
ACOGEASSAEO 

3040 DATA “OCARAACOGESCSBSEDDESCS 
SSODESSAREDOAREEAADO4L 4 4444002222 
dona e SS CE PONEEAANDO DE 


"“DERESSSOD4A ARRESIOCARC 
ASQOEASACEODEL SSL GOAAARAEGOARAA 
ASADOARAREEDORRISSARADARALASBOEZ4 4 
8EQ02222A40" 

3060 DATA "“DOBLLLLDODILLLSODARDS 
4400002000FOD4ASCSEVODEZEAFOSSERA 
REOODESSSED22EARREGOGERESEDADEL E 
444 0D0EAREZE 

3070 DATA “SSEARAAADO4S04446002022 
S2ESBSACCARDC4ALLSLEGODREERAGODCAR 
RAGODERAAREGODEARESSO2EARE2200685 
88000E842E0" 

3080 DATA "44E4A4EBODARAAAFODOQAAR 
RADODARREADOVARIALAGOGARREZEDOE2S 
Ras sacas Or CORDA ADORAR 


| 
16»DMQLRDTIMDA 
emeTVSDUH O 
MmoJTrRGoemH 
+79"r90J999 
USSPrRUMmSL»D 
:0M Thy nú 


1030010208312D455 
424 9S2DOSSAECOSLASSESA4FF 
020832204 14C4D'" 
ATA "4143454E4152204041205 
anna as aaa PST RA 
208332D4940D5052' 


dStrtiodesáés pisesdessapPTasaS 


3420534 14 

1070 5 4 SAE S04 SA D4ESA4LFF1 
2700102 2D434 152474 1522044452 
D43494E FF10800102" 

4280 DA "08362D4C0454552204C0415 
3205041 4E41532041404D4 143454 
E414441 
4290 DAT 


Dê 
ne-nsAm 
DDUNDÊEDDO 


3 
á 
4 
F 


ds a : 
LU] 
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do extendido, desplazará el cursor hasta 
el siguiente tope de tabulación; para bo- 
rrar los topes pulse «9» en modo exten- 
dido. 


Margen adentrado 
Si desea utilizar un margen izquierdo 
adentrado para un párrafo, coloque el 
cursor sobre el início del párrafo, pase a 
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modo extendido y pulse «P»; ahora siga 
escribiendo normalmente; cada vez que 
pulse ENTER el cursor se situará en la 
columna donde estaba cuando pulsó 
«P», generando así un párrafo adentra- 
do; para volver al margen izquierdo nor- 
mal pase a modo extendido y pulse «B», 
que borrará el párrafo adentrado. 
Para terminar la página pase a modo 
extendido y pulse «ENTER». 


Si desea acentuar una vocal, púlsela en 
modo extendido, con lo que conseguirá 
la vocal acentuada. 


Con el fin de aprovechar al máximo 
la memoria hemos omitido las sentencias 
REM, por lo que se adjunta un mapa de 
las distintas rutinas sobre el programa en 
BASIC, así como un mapa total de dis- 
tribución de la memoria. 


MAPA DE MEMORIA DEL EDITEXT 


RUTINA PARA IMPRIMIR LA PAGINA CERO EN PANTALLA 


NOMBRE: C.M. (12 parte). LONGITUD: 90 Bytes. 
ENTRADAS: Ninguna. DIRECCION DE ARRANQUE: 32595 d. 
SALIDAS: Texto de Pág. cero DIRECCION DE INICIO: 32589 d. 





a pantalia. TIEMPO DE EJECUCION: 1 seg. | 
igo 
Direcc. Máquina Listado Assembler 
32589 6213 1 LB7 LDASD Carga Código ENTER JER 
32591 215 020 RST 10 “Haz nueva línea | 
32592 35 03) INC HL “Incrementa puntero 
32593 248 040 JR LB1 Salta a LB1 sósia. | 
32595 622 050 LD A,2 "Abre canal Foca [o 
32597 205122 do) CALL 1601  ;número 2 ET 
32600 33194133 (70 LD HL85C2 -;Inicializa puntero 
32603 62,194 08) LB1 LD A19M Direcciona pie d 
32605 50,54,92 LD (5C36),A primer 
32608 62,126 10 LD A/126 juego de 
32610 505592 11 LD (5C37,A —;caracteres 
32613 126 120 LD A(HL) Carga carácter 
32614  254,255 130 CP FF 'Si es 255 
32616 40,60 140 JR Z,LB6 salta a LB6 
32618 126 150 LDA(HL)  :Carga carácter 
32619 25413 160 CP QD 'Si es 13 
32621 40,222 170 JRZLB7 | saltaa LB7 
32623 126 180 LDA(HL) “Carga carácter 
32624 2460 19 OR É 'Si es cero 
32626 40,42 200 JR ZLB4 salta a LB4 
32628 215 21) LB2 RSTIG “Imprime carácter 
32629 628 a LD A8 Retrocede 
32631 215 2 RST 16 “CUSOr 
32632 35 244 INC HL “Incrementa puntero 
32633 62,129 250 LD A,129 Direcciona segundo 
32635 505592 260 LD (5C37) juego de caracteres 
32638 126 270 LD A(HL) Carga carácter Mapa de memoria del EDITEXT. 
32639 254255 280 CP FF 'Si es 255 
32641 40,35 294 JRZLB6 salta a LB6 
e = A » a quis e RUTINA PARA TRANSFERIR LA PAGINA CERO 
32646 4d197 3% JRZLB7  Saltaa LB7 A CUALQUIER PAGINA DE ALMACENAMIENTO 
32648 126 334 LD A(HL) "Carga carácter NOMBRE: C.M. (2º parte) 
32649 246,0 340 OR 0 ii ES Cero ENTRADAS: En las direcciones 32680 y 32681 se introduce la dirección de 
32051 4021 35 JRZLBS salta a LB5 o áina de det ; rege eia 
20653 915 A LB3 RSTIÓ Eira carágior la página de destino (cuando se carga, estos valores quedan 
inicializados para tomar como destino la página uno). 

32654 35 37 INC HL Incrementa puntero 
32655 299 PUSH HL “Guarda puntero SALIDAS: La página cero es transferida a la página de destino. 
32656 3366139 3% LD HL8B42 :Carga tope puntero LONGITUD: 12 Bytes 
32659 193 ad) POP BC “Carga puntero DIRECCION DE ARRANQUE: 32679 
3266) 55 410 SCF :Ácarreo a uno DIRECCION DE INICIO: 32679 
32661 63 424 CCF ;Acarrero a cero TIEMPO DE EJECUCION: 26 miliseg. 
a 2a 6e a SBS HLBC Si es fin de pág. Código 

12 JR Z, LB6 salta a LB6 i 
666 197 PUSH BC 'Restituye Direcc. Máquina Listado | Assembler 
32667 225 460 POP HL puntero 32679 1766139 (1 LD DE8B42 :Carga destino 
32668 24189 47 JR LBÍ Salta a LB1 32682 33194133 (20 LD HL85C2 ;Carga origen 
ul nro À o dida AZ) Do Repaçdo 2685 11285 da LD BC0580 :Carga longitud 
STA 60% ES LDA O Corta asma 32688 237176 Qu LDIR dl incrementa 
pel Rd a LB6 pa Coin 3269 201 050 RET “Retorna y repite 
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CAMPOS DE ENERGIA 


Francisco LORCA SALAS 


Spectrum 48 K 





Para ubicarnos en una central nudear no hace falta 
contar con una gran imaginación aunque, en este 
programa que veremos a continvación, se encuentre en 
cualquier espacio interestelar. 


Asi pues, situémonos en esa central 
nuclear en donde nosotros seremos el 
guarda. Nuestra misión será la de pro- 
curar que los pequenos escapes que se 
producen, no salgan de las cuatro torres 
representadas en la pantalla. Si no lo con- 
seguimos, iremos perdiendo un poco de 
energia con cada escape y, si éste es muy 
grande, perderemos una vida. 

A pesar de que disponemos de siete vi- 


1 OVER O: BORDER O: PAPER Q 
INK 7: CLS 
REM F 
LE eira 
GO sÚ 9800 
GO SUB 9840 
LET h=0 
GO SUB 8000 
GO SUB 99000 
ao dad] 0,23,95,"” E 


po o MM 
IF Llic<=1 THÉN GÓ TÓ 7000 
LET p=p-.0S: PRINT OVER G;R 
ET 9=1: GO TO (INT (RN 
+ 


1 TO PRINT INK 7; 


- O—- SONSUSSOVAUN 


NL SLUGUMND 
x 


+ OA 
E" 


das, las iremos perdiendo, también, ca- 
da vez que pulsemos fuego (0) fuera de 
los extremos rectangulares de la torre o 
si, en ese momento, no hay ningún esca- 
pe en ella. 


La partida finaliza cuando se pierden 
las siete vidas de que disponemos. Para 


jugar, existen tres controles: arriba; «l» 


ó «7»; abajo: «2» Ó «6»; fuego: «O». 


6S IF INKEY$="1" OR INKEY$="7" 
THEN LET X2Xx41: LET Udo nas 

70 IF INKEY$="2" OR INKEY$="6 
THEN LET x=x+1: LET uz=u+1 

7S IF y=-1 THEN LET y=21 

80 IF y=22 THEN LET y=1 

83 IF x=-1 THEN LET x=30 

87 IF x=31 THEN LET x=0 

90 PRINT INK 3;AT y,x; "PA" 

92 IF INKEY$="0'" THEN IF q THE 
N GO SUB 1000 

93 NEXT d 

95 RETURN 


ai 


100 LET o=s FOR f=1 TO 4 
105 LET a=1 

Stos PRINT AT 10+2+f,15; INK 5;a 
115 GO SUB 60 


RA 
& 





NOTAS GRAFICAS 


B CD PEGUE st) 
E E o. 


e . 43 


120 BEEP ,Q4,f 
1306 PRINT AT 10+2+f,10;a$(f);AT 
11+2+f,15; INK S;astf) 

135 GO SUB 60 

140 BEEP .04 ,f 

150 PRINT AT 11+42+f,15,ast(f) 
160 NEXT 

165 IF 5s<>»0 THEN PRINT FLASH 14; 
AT 11+2+4f,15; INK 6;“R": BEEP ,1 
,-30: BEEP ,1,-28: BEEP ,1,-26: 
BEEP .1,-28: BEEP .1,-30: PRINT 
AT 11+42%F,15; INK 7; "8" 

167 IF 5=0 THEN LEf TVisli-.2: P 
RINT AT 21,21; "VIDAS";AT 21,27; 
OVER GB; INT Li; * 

170 GO TO 39 

200 LET 0=s: FOR f=1 TO 4 

20s LET a=2 

210 PRINT AT 11-2+f,16; INK 3;a 
s(f) 

215 GO SUB 60 

220 BEEP .Q4,! 

230 PRINT AT 11-2+f,16;a$(f);AT 

10-2+f,16; INK 3;agt(f) 

235 GO SUB 60 

240 BEEP .04,! 

2508 PRINT AT 10-2+f,16;ag(f) 

260 NEXT Ff 

265 IF s<>50 THEN PRINT FLASH 4; 
AT 10-2+f,16; INK 6;"%": BEEP .,1 
27-30: BEEP .1,-28: BEEP .1,-26 
BEEP .1,-28: BEEP .1,-30: PRINT 
AT 10-2+F,16; INK 7;"3B" 

267 IF s=o THEN LET li=li-.2: P 
RINT AT 21,27; OVER O; INT Li;” 
";AT 21,21; OVER GB; "VIDAS" 

270 GO TO 39 

300 LET 0=s5: FOR f=1 TOS 

305 LET a=3 

310 PRINT AT 10,15-2+f; INK 4;b 
G(F)3 

315 GO SUB 60 

320 BEEP .O4,F+6 

330 PRINT AT 10,15-2+Ff; b$(FI;AT 

10,14-2+F; INK 4; b$(F) 

33S GO SUB 60 

340 BEEP .Q4,f+6 

350 PRINT AT 10,14-2+F,b$(f) 

360 NEXT Ff 


S6S 


IF s<»0 THEN PRINT FLASH 12 


AT 10, 14-24; INK 6;"B": BEEP ,í 


1 =30 


EEP «.1,-28 BEEP .1,-26 
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EEP 11,-30: PRINT 1245 IF a<>52 THEN GO TO 2000 8350 «mm 
7 8 INK 7 é = 1250 LET s=s+20 8400 ' 
367 HEN Tua istive2i P 1260 LET 9=0 8410 LET p=S 
INT | QUER Li 1270 RETURN E 
1,2 2; “VIDAS” 1300 IF u)20 OR y<18 THEN GO TO 3900 PLOT 126,99 oRRAN. de 
420 FOR f=1 TO S 1310 FOR q=11 TO 20: PRINT PAPER + BRAM 6-6 doc o 
40s S;AT 18,94;" "AT 19,94;”" ";AT 20 D Para, 
410 PRINT AT 11,16+2+4F; INK 6;b q:" »: NEXT q DRAU ua 
CÊ) 13520 BEEP .03,-10: BEEP .03,-13 DRAU 84,0 2 
415 GO SUB 60 BEEP ,03,-15: BEEP .03,-10 E, -84,0 RA 0,25 4 
420 BEEP .04,F +6 1330 FOR q=11 TO 26: PRINT PAPER , DRAU 40, - 
430 PRINT AT 11,16+2+4f; b$(f);AT G;RT 18,4; “;AT 19,9,” “;AT 20 Bi 
11,17+2+4Ff; INK 6, b$(F) dig NEXT q ! ; DRA 0,25 D 
435 GO SUB 60 133S IF a<>1 THEN GO TO 2000 7 SRAU -40,<77 
440 BEEP .D4,f+6 1340 LET s=5+20 AU Zdá O 
450 PRINT AT 11,17+2+Ff, b$(f) 1350 LET 9=0 ,25: DR nar pt 
460 NEXT f 1360 RETURN 48º = BRAS 
- ER +2 % , a" . 2210 FOR r=y TO 21 ' 1 = v 
oo '6EES 1,026. deBp .i cao B0a0 PRINT AE,f28-4; INK 6; "SNS BRR 3670: DRAU O, -146 DRAU 30 
BEEP .,1,-28.: BEEP ,1,-30 PRINT 2030 BEFP .001,r e ay do ct pa «ql 
AT di, 174240; INK 2,08] 2040 PRINT AT r,x-1; "559" SS DRAU O: -4 DRAU' “107, -71 
467 IF $=0 THEN LET liuli-, 2. :P 2050 NEXT r GRAU 306 Bias 9 REU , 
DE gd A PAZ AD qd Aa PR A A soso LET Liwti-i: PRINT QUER 0:0 0080 PLOT' 134,89. DRÁU 107,71: O 
T.,21,27, INT lis” “: IF lic=ã TH RAY -30,0: DRAW 0,-146: DRÁU 30, 
EN GO TO 7000 a 2,146. DRAL -30,0: DRAU 
1000 IF x<6 THEN GO TO 1100 2065 PRINT AT y,x; “tá ““ORAU O é DRAU LOS 94 
1010 IF x>9 AND x<22 THEN GO TO 22070 RETURN ado DhCU Sora 
1200 7000 FOR f=a TO so rRBINT OVER O , , 
1020 IF NOT x»24 THEN GO TO 2000 T 10,8; INK f/9; sim Mo 
1030 IF x029 OR yc<2 OR 4>19 THEN hM E O UV E Rº: BEEP .001,f: NE par (aba a AT E ces BANDOS DE 
ú f N ; ; 
104 TO 19: PRINT PAPER 700S IF s>h THEN LET h=s: INPUT mo co R A + BRER «OD: NEKT OD N 
3;A "+ NEXT q “RECORD: INTRODUCE TU NOMBRE 9838 RETURN 
105 BEEP .03,-13 (4 Letras maximo)'!, LINE E 9840 PRINT AT 10,0; iende el 
BEE BEEP .03,-10 7100 PRINT OUER Q;AT 18,4; NUER TOLO Cor VU made 4 E CN CUGERAO " 
120560 TO 19: PRINT PAPER SE 1;"PULSE CUALQUIER TECLA”; AT campos de energ final de 
2; AT ": NEXT q 220,5; INVERSE 1; "PARA VOLVER A E Los eua tico Er a 
1065 THEN GO TO 2000 MPEZAR ART 21,0, INVERSE O, INK '* sistema.,Si er tos ca 
ESA RECORD  Q do va - nPOosS en otro no sean 
tedo IF INKEYS<> THEN RESTORE tos finates as destr 
7366 60 Tô vado O TO 49 ida 
GO TO 2000 8900 FOR f=USR “a” TO USR “$"+7 6a gp auro a 
1110 FOR q=2 TO 19: PRINT PAPER 8010 READ x: POKE f,x: NEXT f ICS EOLdON rss 
EE ,>100 BEÉ 215010 194 BIN 10111016 BIN 0161 Francisco Lorca P 
1180 BEEP .203,-13 pa 4 , n cl 
BEEP EEP .03,-10 2100,40,0 INT AT 21,4; Putsa una te 
1130 | PRINT PAPER 8030 aÃ Ra 2,16,420,BIN 201010100,4 9855 PAUSE Q GO SUB 9800 
2: AT NEXT q 2,16,0,0 9860 PRINT AT 
1135 EN GO TO 2000 8040 DATA 2,e, O ,24,24 2,0,0 rriba)y etaba 
1140 8250 DATA 0,0,0, [6,60,6 Uue te NUR 
1150 8060 DATA 255, 195, 186. 189,189,18 Pt atdas CEs 
1160 s,195,255 or un lado de 
1200 IF y>10 THEN GO TO 1300 8070 DATA 2, 62 S4,42 52,0, o as Et BECO 
1210 IF y<i OR y>3 THEN GO TO 20 8980 DATA 68 46,68 ,6,0 0670 PRINT * 
22 B090 DATA 36º 240 ,248, 249" 249, 240 
1220 TO 20: PRINT PAPER "96,0 
3 “AT 2,4; “;RT 3,4; 8100 DATA 6,15,159,247,159,15,6, 
,/-10: BEEP .03,-13 8110 DATA BIN 11011010,33,76,195 
BEEP .03,-10 24 BIN 21100101,BIN 1001601Í,B1I 
TO 20: PRINT PAPER N 211900100 
AT eq" ";AT 3,9; 8250 LET x=1: LET v=1 
B300 LET ag="--€8" 





QUE NO SE TE CRUCEN 
LOS CABLES. 


PON TU 


ORDENADOR 
EN SU MESA 


Diseno especial en resinas y 
fibra de vidrio. 

Cómoda por la superficie de 
trabajo. 

Un solo interruptor conecta y 
desconecta el sistema. 
Relación precio/calidad sin 
competencia. 


CARACTERISTICAS 
100 x 70 x 65. 


Elige tú el color. 
Soporte móvil del visor (según 


normas NICOSH) 
Información y pedidos: DISENO (49). Telf: 91-871 73 42. 
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Algo mas que 
una tienda 
de ordenadores. 


Algo más en Servicio. 





Personal altamente cualificado le asesorará en todo lo re- 
lacionado con el mundo de la microinformática y la robó- 
tica, asesoramiento que continuará aún despues de haber- 
le instalado su ordenador, en su propio domicilio. Garan- 
tia total en todos sus productos. 


Algo más en Ordenadores. 


Mas de 30 marcas de ordenadores, familiares, profesiona- 
les y superprofesionales, donde poder elegir el más ade- 
cuado a sus necesidades. 


Algo más en Complementos. 


La más completa gama de complementos imaginales: in- 
terfaces, cassettes, floppy disk, diskettes... compatibles 
con Apple e IBM. Telefonia sin hilos. y además dispone- 
mos de la más completa bibliografia sobre microinformá- 
tica y robótica con más de 500 libros y revistas editados 
en varios idiomas. Tambien podemos suscribirle en cual- 
quier revista nacional o extranjera. 





Algo más en Robótica. 


Somos la primera tienda en Madrid especializada en ro- 
bótica. Le ofrecemos desde el más divertido Robot- 
jJuguete de 13.800 pts. hasta el más sofisticado de 
1.000.000. 





Algo más en Facilidades de Pago. 


Plazos especiales en ordenadores familiares y Leasing en 
ordenadores profesionales. 


E 000000 

0000000000 

O 0 007) 
Todo en Microinformática O ó E 
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ENTREVISTA 





Garcia Gete hace balance de la campafia navidefia 











INVESTRONICA, 


VIENTO EN POPA 


Gabriel NIETO 





Tras la fuerte campaiia de ventas navidefias nos 
pusimos en contacto con el Director de Investrónica, 
Ricardo Garcia Gete, para que nos contara cómo habían 
ido las ventas más fuertes del afio. | 


En la sede de Investrónica, en una es- 
pecie de pequena habitación que parecia 
estar pensada expresamente para recibir 
visitas, se encontraba Ignacio Argote y 
Ricardo Garcia Gete. Con este último, 
mantuvimos una larga conversación. Pa- 
peles en mano y esperando mi primera 
e inevitable pregunta, las ventas navide- 
nas, comenzó la entrevista. 

«Nosotros nos habíamos planteado 
una serie de objetivos de cara a esta cam- 
pania, y en base a esto habíamos estruc- 
turado los stocks y la publicidad. Nues- 
tra idea de ventas estaba en torno a los 
40.000 ordenadores v la realidad es que, 
no sólo se han cumplido las previsiones, 
sino que además se han superado. Flemos 
vendido alrededor de 50.000.» 

Para ser exactos, han sido 52.000, de 
los cuales se puede efectuar el siguiente 
desglose: 

— 35.000 Spectrum. 

—45.000 Plus. 

— 2.000 QL. 

Estas cifras sobrepasan, aproximada- 
mente en un 30%, las previsiones que te- 
nían hechas para la campana. A media- 
dos de diciembre y, debido al crecimien- 


«Superando 
revisiones, hemos 
alcanzado una venta 
de 50.000 
ordenadores 
durante las 
Navidades.» 


to experimentado durante la primera 
quincena de la demanda, Investrónica 
tiene que pedir 15.000 ordenadores más. 

Cuando le preguntamos por la acogi- 
da del Plus a Garcia Gete, su respuesta 
fue rotunda. «Muy buena»; tras lo cual 
matizó: «Quizá ha entrado un poco tar- 
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de v esto ha motivado que la gente que 
no to conocia siguiera pidiendo Spectrum. 
De todas formas, ha sido muy buena ya 
que, pese a ser un producto que se intro- 
dujo a primeros de noviembre, lo presen- 
tamos en el SIMO como primicia mun- 
dial en una feria y, a finales de noviem- 
bre, principios de diciembre, llegó a los 
distribuidores.» 


El prelazamiento del «OL» | 

A pesar de todo, el rey sigue siendo el 
Spectrum: «Si hubiéramos tenido más, 
hubiéramos vendido más.» 

Cuando hablamos del QL, tema que 
por otra parte no podia faltar en nues- 
tra conversación, nuestro entrevistado 
nos aclaró algunos aspectos que parece 
ser, no estaban suficientemente claros. 
«El lanzamiento que hemos hecho del OL 
no ha sido el lanzamiento oficial que va 
a hacer Investrónica, es decir, cuando lo 
hagamos se hará con las condiciones ha- 
bituales de nuestros lanzamientos, toda la 








documentación en castellano y todos los 
programas también. Esto ha sido un pre- 
lanzamiento del producto, motivado por 
la demanda que habia en el mercado.» 

Esto parece ser que no ha sido impe- 
dimento para que, en menos de un mes, 
va se hayan vendido 2.000 QL, cifra muy 
estimativa si tenemos en cuenta el tipo 
de ordenador que es. 

El lanzamiento definitivo se hará so- 
bre el 15 de febrero, aunque depende de 
que Sinclair termine la versión definiti- 
va en inglés. Ya está hecho el teclado en 
castellano y la versión de los cuatro pro- 
gramas, sólo falta que a los últimos de- 
talles del sistema operativo les den el visto 
bueno. De todas formas, el interés por 
este ordenador se ha hecho patente en las 
oficinas de Investrónica. 

Hay un dato estimativo en toda esta 
campania, que ha seguido marcando el 
rumbo de los ordenadores domésticos: la 
supremacia del Spectrum, incluso por en- 
cima de la nueva versión. «La gente co- 
noce el Spectrum, entonces cuando le 
ofreces algo que sea distinto de Spectrum, 
aunque como en este caso sea también 
Spectrum, la gente tiene sus dudas, sobre 
todo el que no sabe nada, no quiere otra 
cosa más que lo que ha visto a su vecino. 
También ha influido mucho el precio y los 
ocho paquetes de regalo.» 

Los tres factores han influido decisi- 
vamente: desconocimiento, precio y las 
cintas; a pesar de todo ello, las previsio- 
nes son buenas para un futuro y parece 
ser que el Plus será una alternativa del 
Spectrum, pero que todavia está muy le- 
jos de desbancar a éste totalmente del 
mercado. El teclado, que es la única di- 
ferencia, parece ser que es aceptado por 
muchos compradores, sobre todo por los 
más jóvenes que no les preocupa y ade- 
más se sienten mucho más a gusto con 
él. 

Los discos del Spectrum 

Otra pregunta que estaba en el aire, era 
la de los traidos v Ilevados discos para 
el Spectrum, los cuales, a pesar de ha- 
ber estado presentes en el SIMO, siguen 
sin aparecer, lo que puede suponer, a su 
vez, un hâándicap para el Spectrum, frente 
a otros ordenadores que ya salen al mer- 
cado directamente incorporando esta op- 
ción. «La unidad que nosotros hemos se- 
leccionado ha sido creada por Timex, una 
casa muy fiable en el campo del Spec- 
trum. El motivo por el que no ha salido 
antes, es porque hemos querido dejar pa- 
sar primero la camparia de Navidad pa- 
ra volcarnos durante el ario 85 en el lan- 
zamiento de este tipo de periféricos.» 







Los MSX era un tema que, por supues- 
to, no podia faltar en esta entrevista; por 
eso, intentamos abordarlo aunque ya nos 
imaginábamos la respuesta. «No, no nos 
preocupa y además por el momento, tam- 
poco está preocupando en Europa, ni en 
Estados Unidos. En este último país el If. 
der del mercado no es MSX, como tam- 
poco lo es en Europa. Por la información 
que nosotros tenemos ni a Sinclair, ni a 
Commodore les preocupa MSX, al me- 
nos por el momento. Hay que tener en 
cuenta que los dos líderes están perfecta- 
mente consolidados en el mundo que no 
sea japonés. Va a ser muy difícil su pene- 
tración en los demás mercados porque 
además hay ya otros productos que no 
son MSX.» 

El mercado espanol y el inglés, según 
él, siguen cierto paralelismo, por eso, nos 
hacia hincapié en que en ninguno de los 
paises se ha conseguido el éxito, que en 
principio se esperaba, de los colosos ni- 
pones. 

A nivel de software, Investrónica sigue 
mostrândose conservadora y ha adopta- 
do una línea muy parecida de actuación 
en este campo a la de Sinclair. «Noso- 
tros no tenemos más títulos que tiene Sin- 
clair Research, lo que ellos sí hacen es que 





Garcia Gete e Investrónica, 
un futuro con muchos 
horizontes. 





seleccionan solamente aquellos programas 
que consideran que son los más idóneos 
y los de mayor difusión. Sin embargo, lo 
que sí hacen es fomentar que existan gran 
cantidad de compariias que vendan soft- 
ware. En Investrônica se hace lo mismo, 
preferimos que los demás creen software 
para Spectrum y en ese sentido colabo- 
ramos enormemente.» 

Para Investrónica, sin embargo, la pi- 
rateria de software sigue siendo un pro- 
blema también incluso para una empre- 
sa tan poderosa como ésta. La adminis- 
tración parece ser que, de momento, es- 
tá preocupada, pero hasta la fecha no ha 
pasado de ser sólo una preocupación. 
«Es un problema muy grave que además 
puede limitar mucho la creación de nue- 
vos programas. Vender, en este país, po- 
cos millares de copias es todo un récord, 
cuando lo normal para el parque de Spec- 
trum existentes sería vender muchos mi- 
les.» Todo esto no influye, sin embargo, 
para que Investrónica siga tratando de 
apoyar la creación de un mercado impor- 
tante de software. 


Software para el «QL» 
Lo que parece un hecho es que el QL 
va a traer una nueva serie de programas 


de aplicación que lo van a diferenciar 
bastante del Spectrum. «El software del 
QL va a ser bastante distinto, la mayoria 
de los programas van a ser de aplicación, 
lo que si se está tratando de hacer en In- 
glaterra es algun tipo de emulador de 
Spectrum, de tal manera que el software 
de éstos pudiera valer para correr en QL. 
Esto es algo a nivel de rumor. De todas 
formas el software del QL va a ser más 
limitado ya que va a ir dirigido a un sec- 
tor mds profesional aunque sea a nivel 
particular.» 

EI QL, lo que no cabe duda es de que 
va dirigido a un público muy determina- 
do, que se va a comprar un ordenador 
para darle una aplicación concreta, in- 
cluso en algunos casos para una única 
aplicación, como pueda ser, por ejemplo, 
para llevar un tratamiento de textos. 

El número de ordenadores en la actua- 
lidad, tras la fuerte campania de ventas 
navideiias, se encuentra entre 175.000 y 
200.000 ordenadores, lo que convierte al 
Spectrum en un líder consolidado. Por 


En un futuro no 
muy lejano, el QL 
contará com 
compiladores para 
otros lenguajes 
profesionales. 


eso preocupa a los creadores del Spec- 
trum cuál va a ser la tendencia de ese po- 
tencial futuro comprador de un ordena- 
dor con mayores prestaciones. «Es evi- 
dente que casi todos los usuarios que en 
su momento tuvieron el ZX 81, aproxi- 
madamente en un 80%, a muchos de ellos 
para las necesidades informáticas que tie- 
nen, les servirá con esto; pero otros mu- 
chos van a pasar al QL. Lo que no pode- 
mos cuantificar, es cuántos van a pasar 
porque la realidad depende de muchos 


factores.» 


Las esperanzas de futuro, está claro 
que están puestas en este nuevo ordena- 
dor que además, intentará ampliar su 
campo y sus prestaciones. «Una de las 
cosas que va a tener el QL va a ser com- 
piladores para otra serie de lenguajes, en 
estos momentos se está hablando de Pas- 
cal, Cobol y algun otro tipo de len- 
guaje.» 

La entrevista terminaba y la conclusión 
era clara: Spectrum sigue siendo, con di- 
ferencia, el rey del mercado del ordena- 
dor doméstico, e Investrónica va a con- 
tinuar su campaiia, una campaiia, por 
cierto, plagada de éxitos. 
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Desventuras de un nuevo rico 


JET SET WILLY 
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E CONTEXT 


V6 


ROCESADOR DE TEXTOS 


(64 CARACTERES/LINEA 


ar Destetiniggo 
EXSPEOTRUM SHK 
Eur 
 VENTAMATIC | 


como el microdrive, como 
memoria externa. Ademaás 
de esto, es importante 
senalar también que es 
compatible con los 
diferentes tipos de interface 
que se comercializan en la 
actualidad en et mercado 
espanol 

Se le ha dotado al 
programa, también, de dos 
nuevas opciones que le dan 
aún una mayor potencia: la 
primera, la de escribir textos 
personalizados y, la segunda, 
la posibilidad de imprimir 
repetidamente un texto con 
la particularidad de que 
cada uno puede colocarse 
en un campo diferente de 
todo un fichero escrito 
aparte. 

El procesador de textos es 
e! más completo que existe 
actualmente en el mercado 
y además, uno de los que 
se han hecho más versiones 
hasta la fecha. 

El menú de opciones es 
muy completo, nos permite 
manipular un texto y hacer 
con él todo tipo de cosas: 
imprimir mayúsculas, mover 
el cursor en bloques, por 
palabras, por caracteres, por 
párrafos, scroll descendente 
y ascendente; centrado de 
lineas; inserción de líneas y 
caracteres; ensamblado de 
párrafos,; justificación de 
márgenes, justificación de 
lineas; normalización de 
márgenes; impresión de 
textos; imprimir con el doble 
de alto; visión ampliada del 
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texto; marcar el principio y 
el final del Block; Copy del 
Block; borrado del texto y 
modo de inserción. 

Los que posean el 

interface 1, tienen una 
opción para hacer un 
catálogo del menu, 
ofreciêndonos una lista con 
los 50 primeros programas o 
archivos cargados en el 
Microdrive. 

Otra opción, es la que nos 
permite elegir el Interface 
con el que vamos a trabajar: 
Centronics o R$232. 

La V6 del Context permite 
trabajar con textos de hasta 
300 líneas. Contiene una 
pantalla de información 
dentro del mismo programa 
que nos sirve de guia en 
todo momento, y nos situa 
en la posición exacta en la 
que está siendo impreso un 
caracter. 

Puede también enviarse a la 
impresora cualquier código. 
bien sea subrayado, con el 
doble de alto o de cualquier 
otro tipo. 

Admite además cualquier 
modelo de impresora con 
interface serie RS-232, 
Centronics, Seikonsa GP 50 
y Zx-Printer, 

Es, en definitiva, una buena 
versión del programa inglés 
que puede ser de mucha 
utilidad para todos aquellos 
que tienen que manejar 
textos muy a menudo, y 
quieran hacerlo de una 
forma cómoda, simple y 
práctica. 


Curso didáctico 
para nifios 


Music-Soft 


48 K 
Tipo: Didáctico Musical 





PVP: 3.800 cada uno 


Los programas 

musicales no abundan 
en nuestro país aunque son, 
sin embargo, una buena 


j 


TEDRIA DELA MUSICA 
CURSO] “a 


costumbre educacional 
además de una forma 
práctica de introducir al nho 
en el mundo de la música. 
Este curso para ordenador, 
está dividido en dos partes, 
cada una de las cuales es 
un programa diferente. El 
curso está pensado para 
que el alumno aprenda, de 
forma progresiva, a través 
de unas lecciones 
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1º Curso: Introducción al 
lenguaje musical. Las claves. 
Los silencios. El compas. 
Las alteraciones. 
Repeticiones. Signos de 
prolongación. Los intervalos. 
Sincopas. Divisiones 
artificiales. La tonalidad 
Dinámica. 

2º Curso: Articulación. Notas 
de adorno, Escala, arpegios 
y acordes. Armadura de la 
tonalidad. Polirritmia 
Instrumentos y afinaciones. 
El metrónomo. E! sonido, 
Formación de ondas. El 
sintetizador. El secuenciador. 
El Sistema Midi. 

Todos los temas están 
tratados con gran lujo de 
detalles y acompanados de 
buenas ilustraciones que 
dotan de un interês especial 
al curso y evitan que éste 
pudiera caer en la 
monotonia. 

Los gráficos estan bien y, 
didácticamente, ambos 


cursos están estructurados 
con mucha lógica y 





explicativas acompanadas 
de representación gráfica 
que le introducen, de forma 
grata, en el tema. 

Cuando cargamos el 
programa, passamos a la 
lección correspondiente 
donde se nos explica la 
materia concreta. Los 
Cursos, que son muy 
completos, tratan cada uno 
de ellos los siguientes 
temas: 


pensando siempre en el 
alumno. 

En el programa han 
colaborado Paloma 
Lemanche, Luis Suja y Pierre 
Suja. Es un buen curso que 
puede servir para introducir 
en la música, de una forma 
diferente, a todos aquellos 
que hasta ahora creian que 
la música era sólo escuchar 
discos o ir a bailar a algun 
Sitio, 





HARDWARE 





INTERIORIDADES 





Y FUNCIONAMIENTO DE LA "ULA” (l) 


Primitivo de FRANCISCO 


la ULA, ese extrafio, negro y caluroso circuito 


es un chip (término anglosa- 
alente a pastilla o circuito inte- 
grado monolítico) que ha sido disenado 
por SINCLAIR RESEARCH para que 
el microprocesador se pueda relacionar 
con el cassette, teclado, altavoz o buzzer, 
monitor o salida de TV, RAM de panta- 
lla y zona de variables del sistema. 

La palabra ULA se corresponde con 
las siglas de UNCOMMITTED LOGIC 
ARRAY cuyo significado es: Matriz ló- 
gica no encargada. La ULA alberga en 
su interior, efectivamente, un conjunto de 














AL MICROPROCESADOR Z-80 





integrado, tantas veces mencionado y nunca bien 
entendido, va a ser desmenuzada en nuestras páginas 
a fin de que Vd. le pierda rápidamente el respeto para 
pasar a ser un elemento de su sistema, tan útil y 
conocido como pueda ser el propio microprocesador. 


circuitos mayoritariamente lógicos, el 
chip es un «Custom» o circuito de en- 
cargo, disenado por Sinclair, pero reali- 
zado por la firma Ferranti (la palabra un- 
committed viene a indicar que si bien 
Sinclair no la realiza, si posee todos los 
derechos). 

La ULA es, en el ZX Spectrum, el chip 
que convierte a este micro en específico 
y por tanto, incopiable si no se dispone 
de la ULA correspondiente, la cual, evi- 
dentemente, no está comercializada ya 
que, como se ha dicho, es un producto 


am Ao AS AS 4 
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Conexión de la ULA a la RAM de 16KBytes y al resto del sitema. (Fig. 2). 





GNO 
XTAL 
MREQ 
AIS 
AI4 
RAS 
ROMCS 
IORQGE 
CLK 
D7 

D6 

DS 
CASS/BUZ 
D4 
KBD9 
D3 
KBDIO 
KBD71 
KBD13 D2 
KBDIZ 


VOSSO win 


Distribución de sefiales y alimentación de la 
ULA. (Fig. 1). 


dl. MINO CASSETTE 
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J 


MICROHOBBY 21 


EV HARDWARE 


propio de Sinclair, que la incluye en sus 
Spectrum, unidad a unidad. 

El uso de la ULA en el Spectrum ha- 
ce que la circuiteria lógica para el acce- 
so a teclado, cassette y pantalla, se en- 
cuentre disminuida al máximo al estar to- 
da ella concentrada en este chip multi- 
funcional. 

Analizândola más profundamente, se 
observa que ha sido disenada conceptual- 
mente con bastante eficacia, aunque pa- 
ra su total desarrollo han sido precisas 
varias ediciones, lo cual es fácil de ob- 
servar leyendo los diferentes códigos nu- 
méricos de las ULA de los Spectrums 
que hemos abierto. Algo que hasta la fe- 
cha no ha quedado suficientemente re- 
suelto, es el desmesurado calor que ha de 
disipar el CHIP, consecuencia directa del 
gran volumen de circuitos que ha sido 
preciso integrar para que la ULA cum- 
pla la totalidad de cometidos mencio- 
nados. 

Aprovechando este comentario en tor- 
no a la temperatura, aconsejamos, en ba- 
se a la experiencia, que se pegue algún 
disipador a la pastilla de la ULA o sim- 
plemente un trozo de aluminio del tama- 
no de la misma con el fin de ayudarle en 
la evacuación del calor. En algunos ca- 
sos de fallos espontâneos de algunos 
Spectrums, hemos comprobado que és- 
ta era la solución; de todas formas, ayu- 
darle a disipar siempre es bueno y pue- 
de colaborar a aumentar su vida. 

En resumen, la ULA es un LSI (Lar- 


SEMIFILAS IZQUIERDAS 


F7FEH 
(32766) 


FBFEMH 
(64510) 


FDFEH 
(65022) 


FFFEH 
(65278) 


(23) (27) 


PIN NAMES 


Ao As ADDRESS INPUTS 
CAS COLUMN ADDRESS STROBE 


DIN DATA IN 
DouT DATA OUT 


RAS ROW ADDRESS STROBE 
WRITE  READ/WRITE INPUT 
Vga POWER (- 5V]) 

Vcc POWER (+5V]) 

Dbo POWER (+12V) 

Vss GROUND 





Distribución de sefiales a los terminales de la DRAM (RAM dinámica) 4116 (16 KBits). (Fig. 3). 


ga escala de integración) que auxilia al 
Z-80 proporcionándole el adecuado ac- 
ceso a los principales periféricos, es, por 
tanto, el segundo de a bordo en el Spec- 
trum, empleando jerga marinera. 


Bloques funcionales de la ULA 

Podemos dividir la funcionalidad de 
la ULA en cinco bloques, cada uno de 
los cuales gestiona el acceso a los dife- 


rentes perifericos. 
Aclararemos que estamos empleando 


el término de periférico a todo dispositi- 
vo externo al microprocesador que tiene 
una funcionalidad específica. Excluimos, 
por tanto, al bloque de memoria sin la 
cual no existiria un soporte físico para 
el software que ha de ejecutar el micro- 


procesador. 
El primer bloque de la ULA, es el en- 


cargado de posibilitar la exploración del 
teclado; el segundo bloque, es el que per- 
mite el acceso a cassette, tanto para sal- 
var como para cargar; el tercer bloque, 


DIRECCIONES DEL TECLADO 


IBH 
(29) (30) 1 (15) 


SEMIFILAS DERECHAS 


se ocupa de generar el sonido que se re- 
produce por el minialtavoz interno; el 
cuarto bloque, cumple la función de 
DMA o acceso directo a memoria (es 
usado, por ejemplo, para leer constante- 
mente el fichero de presentación por pan- 
talla, actualización de ciertas variables, 
etc.), y el quinto bloque, que se ocupa de 
generar las senales eléctricas de vídeo (lu- 
minancia, color y sincronismos). 

Los cinco bloques, aunque indepen- 
dientes a nivel funcional, están interre- 
laciones por las seniales de control del mi- 
croprocesador mediante la lógica in- 
terna. 

En la figura número dos, se muestra 
mediante el esquema eléctrico, la totali- 
dad de conexiones de la ULA a sus cir- 
cuitos y periféricos dependientes. 

La ULA se encuentra encapsulada en 
plástico en formato DIL (Dual in line) 
de 40 patitas o pines. La distribución de 
senales se ve en la figura número uno. 


SEMI PUERTO 


FILA pagto 


(57342) 


BF FEH 
(49150) 


AIS > fE FEM 


(32766) 
BIT BUS DE 


Y DIRECCION 


IDH 1EH—HEXA.| sALIDA 
(27) (29) on) TECLADO 





El teclado: Direcciones de sus semifilas y salidas de sus columnas hacia el bus de datos. (Fig. 4). 
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Conexión eléctrica de la ULA 


Volvamos a la figura número dos, en 
ella se muestran las conexiones de la 
ULA al resto del microordenador. 

En la parte superior, existen cinco ter- 
minales de entrada denominados KBD 9 
a KBDI3 que proceden directamente del 
teclado, por ellos, entrará la información 
de la tecla pulsada cuando lo requiera el 
programa. Por los terminales denomina- 
dos Al4y AlS del bus de direcciones, la 
ULA se entera si el microprocesador es- 
tá corriendo en los primeros 16 KBytes 
de RAM con los cuales opera en DMA 
(de esto vamos a tratar en un próximo 
artículo). 

Las entradas denominadas Vce, Vec2 
y GND, son entradas de alimentación. 
XTAL es el terminal que va asociado al 
cristal de cuarzo de 14 Mhz, verdadero 
corazón del Spectrum, bajo cuyo ritmo 
operan el microprocesador y la ULA. Es- 
ta entrada es, en realidad, el control del 
oscilador interno que proporciona el 
clock del sistema. Los terminales U y V 
entregan las seiiales de información de 
color para cada punto de pantalla barri- 
do por el televisor o monitor de vídeo, 
y es la salida de luminancia Y sincroni- 
mos de la senal de vídeo. 

Por el terminai CASS/BUZ, circulan 
las senales de cassette o la senial sonora 
hacia el minialtavoz o Buzzer. Las sefia- 
les MREQ, RDWR e INT proceden del 
bus de control del microprocesador. 
IORQGE es el terminal por el cual se di- 
recciona la ULA. EL Z-80 accede a la 
ULA mediante el bit AS del bus de di- 
recciones y la senial TORQ cuando am- 
bos son cero, la ULA se direcciona co- 
mo puerto. Por el terminal CLK, la ULA 
inyecta la serial de reloj al Z-80, previa- 
mente dividida en frecuencia. El hecho 
de que el clock del microprocesador atra- 
viese la ULA, determina que ésta pueda 
controlarlo, como también veremos de- 
tenidamente. 


El terminal ROMCS bloque la ROM 
cuando es preciso dejar su bus en alta im- 
pedancia. Los terminales DO a D7 van 
al bus de datos. Mediante los terminales 
DAQÓ a DA6 y RAS, CAS y DWR, la 
ULA obtiene el acceso directo a memo- 
ria al tiempo que colabora en el refresco 
de los primeros 16K Bytes de memoria 
RAM dinámica. 


El teclado 


El teclado es el primer periférico con- 
trolado por la ULA que vamos a anali- 
zar. El teclado es eléctricamente una ma- 
triz de pulsadores de ocho columnas por 


cinco filas, lo cual corresponde a cuaren- 
ta teclas. Estas teclas así organizadas, son 
válidas tanto para el Spectrum normal 
como para el Spectrum Plus. En el Spec- 
trum Plus el resto de las teclas son, en 
realidad, contactos en paralelo con las 
cuarenta básicas que desdoblan la ope- 
ratividad de algunas de ellas y, por tan- 
to, facilitan su manejo. Por ejemplo, la 
función DELETE, que en el Spectrum 
normal requiere el uso de dos teclas si- 
multáneamente (CAP SHIFT y 6), en el 
PLUS, la tecla independiente DELETE 
activa los dos contactos internos necesa- 
rios al ser oprimida. 


| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 


tecla; por el contrario, cuando se activa 
alguna de ellas, el cero que genera el bus 
de dirección atraviesa el diodo y tras la 
tecla se presenta en la salida correspon- 
diente poniéndola a cero. 

Pongamos un ejemplo: Supongamos 
que se oprime la tecla R; cuando la ruti- 
na de exploración del teclado presente un 
cero en el bit AlO del bus de direcciones 
y el contacto de la tecla esté cerrado, el 
bit D3 será puesto a cero. Este cero Ile- 
gará, finalmente, al bus de datos median- 
do la ULA que quedará a su vez habili- 
tada por la propia rutina de exploración 
mediante el bit AÓ = 6. 


AL BUS 

DE DATOS 
MEDIANTE 
EL PUERTC 
FEH( 254) 
YLA ULA 


= 
NS 


——U——U 
zo 
“o 


LA-—0—-—à—-—0)—-—0——)-—p—-—p-— A 


KBD7 | KBD2 | KBD4 | KBOS | KBOB | KBD7 


”, , y y, 
D6 D1 D2 


AZ AN Alo Ag 


BUS DE DIRECCIONES 


D3 





KBD6 | KBO3 


y, 
DS 


AS 


Esquema eléctrico del teclado del Spectrum. (Fig. 5). 


En ambas versiones del Spectrum, los 
pulsadores de las teclas están realizados 
por dos lâminas de plástico con pistas 
metalizadas que se tocan cuando la te- 
cla respectiva es actuada. 

Las columnas del teclado van conec- 
tadas eléctricamente a los bits A8 a AIS 
del bus de direcciones, tal como se mues- 
tra en la figura número cinco. Cuando 
una tecla es oprimida, la senial del bit del 
bus de direcciones correspondiente entra 
en el bus de datos controlada previamen- 
te por la ULA. 

Los diodos puestos en serie con cada 
uno de los bit de dirección, hacen que no 
se produzcan cortocircuitos entre ellos 
cuando dos o más teclas son activadas 
a la vez. Los terminales del teclado se co- 
nectan directamente a la tarjeta del Spec- 
trum mediante dos conectores, por uno 
las filas y por el otro las columnas. Es- 
tos terminales están numerados desde 
KBD 1 hasta HBDI3. 

En la salida del teclado, se hallan cin- 
co resistencias de 10K Ohmios que pola- 
rizan positivamente las salidas del tecla- 
do cuando no se ha oprimido ninguna 


Direccionamiento del teclado 


El teclado puede direccionarse me- 
diante la rutina de exploración conteni- 
da en la ROM, o bien, directamente 
usando el puerto FE H (254) e interpre- 
tando después el dato recibido. 


El teclado se encuentra dividido en dos 
bloques de semifilas. Cada una de las se- 
mifilas tiene cinco teclas y se correspon- 
de con una dirección de puerto. Así, pa- 
ra todo el teclado se utilizan ocho semi- 
filas. 


En ambas semifilas, el dato se recoge 
con los cinco bits de menor peso del bus 
de datos. 


La dirección de semifila se compone 
de dos bytes, el de menor peso ha de ser 
siempre FEH (en FEH el Bit AÓ = 5) 
y el byte de mayor peso que es el que ac- 
tiva la semifila correspondiente. En la fi- 
gura número cuatro se muestran la tota- 
lidad de las direcciones y los datos que 
se obtienen, direcciones y datos están ex- 
presados en decimal y hexadecimal para 
comodidad del usuario. 
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Jesus P. BENITEZ VERAUGO 


Spectrum 48 K 


Este rs. rograma de 
utilidades, le servirá 
de do aco! 

realizar cualquier ti 
de cálculo, oi leg 
en una misma cinta, 
una gran variedad de 
opciones aritméticas. 


Determinantes, sistemas de ecuaciones, 
ecuaciones de segundo grado, ecuaciones 
en general, gráficas de funciones, integra- 
les definidas, operaciones normales, pro- 
ductos vectoriales, escalares y módulos 
de vectores. Todas estas opciones se pue- 
den realizar de la manera más sencilla, 
una vez que se presenta en pantalla el me- 
nú de opciones principal. Con sólo in- 
troducir nuestra elección, el ordenador 
nos pedirá los datos oportunos y nos da- 
rá los resultados. Para los gráficos, ofre- 
ce dos alternativas: 

“-AMPP, pulsando | ampliará las 
gráficas de dos formas. 

“2-NEW LIMITS”, que cambiará los 
límites de la función. 


es 
19 REM O J. BENITEZ 1984 
20 BORDER O: PAPER O: INK 7 


CLS 
PRINT AT 0,2;"1- DETERMINAN 


TES” 

SO PRINT AT 2,2;"2- SISTEMAS D 
E ECUACIONES" 
60 PRINT AT 4,2;"3- ECUACIONES 
PRINT AT 6,2;"4- ECUACIONES 


so “"S- GRAFICAS" 
90 PRINT AT Tó" hi "6- INTEGRALE 


100 PRINT AT 12,2;''7- OPERAR" 
110 PRINT AT 14,2; '8- PRODUCTO 
VECTORIAL " 
ESCALA PRINT AT 16,2; "9- PRODUCTO 
115 PRINT AT 18,2;"10- MODULO D 
E VECTORES” 
117 PRINT AT 20,2;"11- SALIR” 
120 PRINT AT 21,4; FLASH 25 “ANT 
RODUZCA OPCION” 
130 INPUT op 
135 CLS 
140 IF op=11 THEN STOP 
IF op =1 THEN GO SUB 170 
op=8 THEN GO SUB 710 
IF op=3 THEN GO SUB 1000 


rea 

rp 

Coy ps 
ta 
Tn 


144 IF op=á THEN GO SUB 590 
145 IF “a THEN GO SUB 830 
146 IF op=2 THEN GO SUB 3000 
147 IF op=10 THEN GO SUB 2000 
148 IF op=9 THEN GO SUB 2080 
149 IF op=S THEN GO SUB 2500 
150 IF op=6 THEN GO SUB 1180 
160 GO TO 35 
165 REM DETERMINANTES 
E tu PRINT “ DETERMINANT 
175 LET ind=0 
180 INPUT “ORDEN DEL DETERMINAN 
TE 2,3,4 “id 


182 PRINT AT 4,0,” 


aa IF d<2 OR d>4 THEN PRINT AT 
0; FLASH 1;"NO ESTOY PROGRAMA 
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“: GO TO 180 


EIS Et 


E) 
i 
=2 THEN GO TO 280 
=3 THEN GO TO 350 
270 G0 TO 431 


280 PRINT AT 6,6;"1 “;atã,ã),” 
E A pe PO 4 DBO ig: 

290 rea AT 7,6;' “;/a(2,2)5' 
“"jaí2, ES Poa 


e) 
29s LET B=a(1l,1)%4a(2,2)-a(ti,2): 


IF ind=i THEN RETURN 
“300 PRINT AT 12,6, "DETERMINANTE 


“910 PRINT AT 16,4, "0OTRO DETERMI 


330 IF INKEY8="s" OR INKEY$="S" 
CLS : GÔ TO 170 

340 RETURN 

350 PRINT AT 6,6;“| “;a(1,1);" 

"“a(L, 2; “;atl,3);* 

560 PRINT AT 7,6:"| ";a(2,1);' 

"ia(e,R);” Miath, Br 

570 PRINT AT 8,6;"| ";a(3,1);' 

"= 2(3,2);" ";atB,B);O 1º 

580 LET B=(a(i,1i)xa(t2,2)42(3,93) 

sa (1,2) 4a (2,3) *a (3,1) +a (2,1) 23 (3 

2)%a(1,3))-(a(1,3)%a (2,2) %a (3,1 

j+a(1,1)%2(2,3)%2(3,2)+3 (3,3) 4a ( 

1,2) %*a (2,1)) 

485 IF ind=1 THEN RETURN 


ei AT 12,4; "DETERMINANTE 
ii PRINT AT 16,4, “OTRO DETERMI 


SE Q 
420 IF INKEY$="s" OR INKEY$="S" 
- TO 170 


431 PRINT AT 6,6;"| "ja(i,i); 
vati,2;" Ciati,5);o BEE o DEP Ea 
432 PRINT AT 7,6;"| “rat2,0);” 
ET ia “iatê, ET “,at2,4»; 
433 PRINT AT 8,6;"1 “;a(3,1);" 
E agua 815 CSRCS AD: 
434 PRINT AT 9 n2814,8)5* 
"pata ,ao Pia t4çõo; o ASatdradso 


435 LET b=0 
LET p=2: LET q=3: 


LET p=1: LET qs2: 
460 LET 0=1: LET p=e: LET q=2: 
470 LET 0=2: LET p=3: LET q=1: 


LET r=4: GO SUB 520 

480 =4: LET pe : LET qui: 
LET r=3: GO SUB 52 

490 LET 0=3: LET p=4: LET q=1: 
LES Go SUB 


r=2: s20 
495 IF ind=1 THEN RETUR 
Ei PRINT AT 12, à; DETERMINANTE 


;b 
“s16 GO TO 550 


Di a ea az=a(i,o)jsa(2,p)-at(ti,p)s 
S30 LET b=ax(a(3,ql)sxa(lá,r)-a(3, 
r)isa(t4,q))+b 

540 RETURN 

SS0 PRINT AT 16,4, "OTRO DETERMI 
NANTE 7? (<2/n1)* 

sS60 PAUSE Q 

S70 IF INKEY$='s" OR INKEY$="5S" 


THEN CLS : GO TO 170 

580 RETURN 

585 REM ECUACIONES N 

S90 PRINT AT 2,2; ECURCIONE 
S ORDEN Nº 

soe ER 


INPUT “ECUACION (X) 

610 INPUT “INTERVALO *; 
""STEP =";e 

630 FOR x=a TO b STEP e 


3, 


6S0 IF s<. 061, AND s>-.001 THEN 

PRINT, FLASH l;"solucion pres co 
rt [a 

Re PRINT. “OTRA ECUACION 7? (s/n 


680 PAUSE OQ 
690 IF INKEY$='s" OR INKEvY$="S 


THEN CLS : GO TO 590 

700 CLS : RETURN 

705 REM PRODUCTO VECTORIAL 
710 PRINT AT 2,2, PRODUCTO 
VECIOR Eh 


720 PRINT AT o 0;" “tai + by +Ck) 
xídi + e4 + fk) 
7230 Ae ia 13, "b=" A CEP SSC 
“dm; “fs ; 
740 PRINT Ar 6,0; Miaili +.cib 
j 4 +, PE Bal TESTA Ta + dE EE, 

“kJ =" 

260" LET iz=bsf-cse 
760 LET jg=cad-asf 
770 LET k=aze-bztd 
1089 sara Atas Sds do O 


5k; 
bad é PRINT AT 10,4, “otro product 
OR INKEY$="5" 
710 


820 RN 

825 REM OPERAR 

830 PRINT “ STOP para parar” 
835 INPUT LINE os 

840 IF 0$='' STOP * THEN RETURN 


1900 REM É a Do Pçs e 
|: PRINT AT 7,10,"axt2+b 


=0" 
1050 PRINT AT 4,7; "teclee coefic 


tes 
1040 INPUT “a=";a “boca” 
1050 LET d=(ABS ibjteo 4%a +C 
1960 PRINT AT 12,4;a; CxtBsl";b;" 
da A GRADE, E qe 
1070 IF dee THEN LET d=ABS d: GO 
TO 1140 


1080 PRINT AT 17,4;'"x="; (-b+(SOR 
dijjz(2+%a) 
19090 PRINT AT 19,4; ''x="; €-b-(SOR 
d)jj2(2+3) 


1100 PRINT AT 21,4,"otra ecuacio 
n 2 + 


PERERA 


A 
A 


E” PROGRAMAS DE LECTORES 





1105 PAUSE Q 

1110 IF INKEYg$='s OR INKEY$="S" 

THEN GO TO 10060 

1130 RETURN 

1140 PRINT AT 14,4; “SOLUCIONES I 

MAGINARIAS" 

1150 PRINT AT 16,4; Ein ;,-b/(2+a) 

1" +"; (SOR diz(2%a);' 

1160 PRINT AT 18, 4," :X=* ;-b/(2+%a) 

p="; (SOR d)/(24%a):; 

1170 GO TO 1100 

1175 REM INTEGRAR 

1240 INPUT “funcion (x) " ,fs 

oo INPUT "limites=? (2)' E Toa 
+ 

sase INPUT “particion “;c: LET c 

rita LET x=a; GO SUB 1350: LET i 


1280 LET d=(b-a)/c: LET 0=c,2 
1290 LET x=x+d: GO SUB 1350: LET 


izi+ysd 
1300 LET x=x+d: GO SUB 1350: LET 
1=1+9+ 
1310 LET 0=0-1: IF 0<>50 THEN GO 
TO 1290 
1320 LET x=b: GO SUB 1350: LET i 
1 = 
1336 CLS : PRINT AT 10, 4;,Fs,A7T 1 
4,4, "limites= nor To vin *- b; AT a R$ e 
4: T= “sdxi/3 
é 1340 GO TO 1370 
1350 LET uy=VAL fs 
1360 RETURN 
1370 PRINT AT 19,4; “OTRA INTEGRA 
L 7": PAUSE O: IF INK Ev $='s'" OR 
INKEV$="S" THEN GO TO 11850 
1380 RETURN 
+ 19200 REM HODULO DE VECTORES 
22000 CLS PRINT * MODULO DE U 
ECTOR a 
ritos PRINT AT 10,4; ''v= ai + bj 
+ c .. 
2020 INPUT “a= “;a,'b= ";b,"c 
pela PRINT. id a na so WAS SRA A 
Ei Po 4 + .. 
2040 LET ná L=SÓR (asa+berb+cx*c) 
2050 PRINT AT 16,6;" = “indi 
e260 PRINT AT 20,5;,"otro modulo 
? (s/n)”: PAUSE 6: IF INKEY$="s" 
OR INKEY$='S" THEN GO TO 2000 
2070 RETU 
22075 REM PRODUCTO ESCALAR 
2080 PRINT AT 2,2; PRODUCTO 
ESCALA 


R' 
2090 PRINT AT 6,0;" (ai + by +Ck) 





X(SI + ey SERIE 

2100 INPUT "“az"ja,'be";b,"'c=";c, 
“dzsd,tem“;se,''t=' HE | 

2110 PRINT AT 6,0,"(";a;"ti + !“;b 
PE E And a bia PR ir ISS DO ED AS À 
“es ES 

2120 RA dad dt DO tod o 

2130 PRI AT 7,4;"'= “",pe 

2140 PRINT AT 8B,S;“otro producto 
2 WA) 

2150 PAUSE Q 

2160 IF INKEY$='s" OR INKEYS$= 
THEN GO TO 2080 

2170 RETURN 

2500 REM GRAFICAS 

es0s CLS 

e510 INPUT “XIit) “;xs$ 

e5S20 INPUT “y(t) * DA 

e525 E: RR 


5 LET f=1: T =1 
2530 INPUT "INTERVALO DE T (-t,t 


) 53 

2546 PLOT 127,0: DRAU 8,175 

2550 PLOT 2,87: DRAW 255,0 

2570 FOR t=-a/rd TO a/rd STEP .1 


2580 LET um=(VAL U$+f)+87 

2590 LET xm=(VAL x$*[)+127 

2600 IF xm<Q THEN GO TO 2640 

2610 IF xm>255 THEN GO TO 2640 

2620 IF ym<Q THEN GO TO 2640 

2630 IF ym>127 THEN GO TO 2640 

2635 PLOT xm,uym 

2640 NEXT t 

2650 PRINT RO, "PRESS 

2-NEW LIMITS' 

2660 PAUSE Q 

2670 IF INKEy$='"1" THEN INPUT “F 

ACTOR f: PRINT HO; REDUZ 

co LIMITES 9 “GO suB 2800: CLS 
GO TO 2540 

2580 IF INKEy$='2'" THEN CLS : GO 
TO 2530 

2685 PRINT "o; OTRA DC 

URVA 

2690 PRUSE 2 

2700 IF INKEYy$="s" OR INKEYy$="5" 
THEN GO TO 2500 

2710 CLS : RETURN 

2800 PAUSE QO: IF INKEYy$='s" OR I 

NKEy $="'S" THEN LET rd= 

2810 RETURN 

3000 REM SISTEMAS DE ECUACIONES 

3205 CLS 

3010, INPUT “N DE INCOGNITAS (2,3 
,4) 5N: DIM C(N,N): DIM ICN): D 

IM Acto N): DIM R(N) 


1 -BMPL * 





EL BOMBARDERO | 


José M.º SILVA MURILLO 


Una vez más, nos 

4 encontramos a bordo 
de un avión en que 
nosotros somos el 

, piloto y tenemos que 
imentar superar una 
difícil situación que 
puede acabar 
trágicamente. 


Sobrevolamos una gran ciudad de al- 
tos edificios que deberemos destruir sin 
remedio si queremos concluir nuestro co- 
metido y lograr aterrizar. La emergencia 
es grande y nuestra misión también. 

Para lograrlo, debemos disparar nues- 
tras bombas disponiendo de tres dispa- 
ros en cada pasada que demos sobrevo- 
lando los rascacielos. El mando para 
efectuar dicha operación es «S». Mucha 
suerte. 








MIL 


| 
| 


piada 
.....r 
eme = 
aaa. 


3020 LET N=INT N: IF N>4 THEN GO 
TO 3010 


3030 IF N<2 THEN GO TO 3010 
3035 PRINT AT 15,0; " INTRODUZCA C 
RR a de NT DE LA INCOG 


3040 FOR J=1 TO 

3050 PRINT AT ARY “8; J 

3260 FOR I=1i TO 

e Sr err Dad “DE ECUACION A O 4 
> 3 4 , 

3080 NEXT I 
32090 NEXT J 
3100 CLS 
3110 PRINT 


AT “ INTRODUZCA T 
RMINO INDEPENDIENTE 


E 
3120 FOR 1I=1 TO 

3130 INPUT | "DE ECUACION SAD” 
"o ICI) 

3140 NEXT I 

3150 CLS 

3152 FOR J=1 TO N: FOR I=1 TO N 
3153 LET ACI, =C(I,d) 

3155 NEXT I: NEXT J 

2160 LET IND=1: IF N=2 THEN LET 
3165 IF N=3 THEN LET DI=380 

3168 IF N=á THEN LET DI=435 

3170 GO SUB DI 

3180 LET CO=B: IF CO=0 THEN PRIN 
T AT 10,0; INVERSE 1 NO FORMA 
SISTEMA CA MATRIZ DÉ | COEFICIE 
NTES VALE OQ GO TO 3 
350 

3190 FOR U=1 TO N 

3200 FOR J=i TO N 

3210 FOR 1I=1 TO N 

3220 LET A(I,J) =C(I,U) 

3230 NEXT I 


3250 FOR J=1 TON 


JSe90 LET RV) =B 
NEXT U 


3310 FOR J=1 TON 

3320 LET RtJi=R(J) 2Cco 

3330 PRINT AT ed SN 
ON god ba do R 6d) 


NEXT 
3350 PRINT" RO; 


3360 gras [a 
3370 IF DE Ss" OR INKEY$="s" 
THEN GO O 
3380 RETURN 


OTRO SISTEMA 
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rece |LAS TORRES 
LT a 
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Alejandro LABORJA y Jorge LIZAR 





— | Spectrum 48 K | 
S POKE 23624 ,50 Spectrum 48 K 
10 PRINT ; "TIÉÊNES QUE CONSEGUI 

p ELESRISAR » PARA ELLO TIENES OU pe e 

E DESTRUTR | LOS EDIFICIOS “; "PU Somos, ahora, los artífices de una importante 

3 DISPAROS POR PASADA."”, "SUERTE” + pe 

So LET pp=6 É contruofensiva en una zona militar de alto secreto, y 
e. a 

168 66 SUB 388 nuestra misión consiste en defender la zona del ataque 

e = “3: 

Boo NEL Xedosa: PEN disparo enemigo que ha ocupado unas grandes torres desde 

e20 PRINT PAPER S;AT a,b;"'S": d nd 

BRENT EEE ES SA0O 8664P' pf rim RES onde nos atacan incansablemente. 

a+t,b;" “: PRINT AT a,b;” 

INT INK 4;AT 20,b; "E" ' Oi . . 

228 LTr, fas tédob)=7 THEN LE Nosotros conducimos un helicóptero dan al jugador; con AF, se define la pun- 
puntos “; E desde el que debemos disparar, e ir eli- tuación obtenida hasta el momento, y 
506 REM Sr, Pati cos AViON o aouil minando a los adversarios de las doce to- con PANT, el número de linea (sumán- 

So, NE 
320 POKE USR «$741,BIN 01000011 rres ocupadas. dolo a 3000 tras haberlo multiplicado 
340 POKE USR 18 774+3)BIN 41111111 Pulsando GOSUB, quedarán defini- por 109) a la que se ha de acudir para 
360 POKE USR “Ss 45,BIN 20000001 3 fi 1 = e 4 u 
396 PORE USA "2716 ,BIN 90060611 dos los gráficos necesarios para el pro- leer los datos de la correspondiente pan 
380 POKE USR 15 1.+7 BIN dosossss | grama. Antes de introducir éste en elor- — talla. 
400 POKE USR “uU"+1,BIN 10000000 
410 POKE USR “U"+2,BIN 11000000 
420 POKE USR “U"+3,BIN 11111000 
430 POKE USR “u'+4,BIN 00111111 
440 POKE USR “uU'+5,BIN 110002000 
450 POKE USR “U“+6,BIN 1902000000 
460 POKE USR “U“+7,BIN 0002020000 
470 POKE USR “tt” +BIN 002001000 
480 POKE USR “t'"+1,BIN 00001000 
490 POKE USR “t'+2,BIN 00001110 
500 POKE USR “t'+3,BIN 2001000 
S10 POKE USR "“t'+4,BIN 01110000 
S20 POKE USR "t'+5S,BIN 01110000 
530 POKE US "1" +6 BIN 01110900 
S40 POKE US “"t'+7,BIN 10000000 
SSso REM graficos ambulancia 
S60 FOR n=1 TO 7: READ x: POKE 

USR "“o"+n,x NEXT n 
S70 DATA 3,3,2,62,63,63,24 
s8o NEXT n 
s90 FOR n=1 TO 2: ai x: POKE 

USR “LC+4n,x NEXT 
600 DATA 0,252, 108, 70,238,252,2 


31 
40 qui INK 4;AT sd,m; “BE 


m 
700 REM edificios 
710 FOR c=2 TO 30 

720 FOR v=(7+4RND) +12 indo 9 

730 PRINT INK O;AT v, = 

740 PRINT OVER 1; INK” 5; PAPER 


750 LET r=0: LET ix=0 
75S REM movimiento avion 
760 FOR Sa UM eo STEP 2 


780 FOR b=0 TO 30 

800 PRINT PAPER S;AT a,b; "Pe" 
BEEP 0.001,40: PAUSE 1 

850 PAUSE 1: PRINT PAPER S,AT à 


900 IF ATTR (asi,b+r+3)=7 THEN 
LET r=r-2: LET a=a: IF a=za THEN 
GO TO 1000 

901 IF a=20 AND bz30 THEN PRINT 

FLASH 1; AT 10,10; E. 
Nº: LE 5: bRINT AT 20,0;' 


T pt =pt+ 

SUA COS totates";,pt 
ago IF 2>=4 THEN Go TO 926 
90s IF NKEv$="0" THEN LET vu2Z=y a 
2+1: GO SUB 200 
920 LET az=a: LET bz=b ia 
es e Z 
10 R TO REM id . E 
: on. peer 0,05, a,0s csias av denador, si se hace por teclado, hay que Premiado con 15.000 

PRINT AT á,b; "tt": PAUSE 2: meter las líneas 9000 a 911 y hacer E ui 


RENT AT b; 
a,b; 
1030 NEXT d RUN. 





1040 PRINT AT 20,b; "JH" ' o 
1080 RETURN ncia Mediante la tecla «L» accedemos al Para aquellos a los que el juego les re- 
O O Os BUSTER: 4 disparo y, conforme vayamos eliminan- sulta demasiado fácil, basta con anadir 


ii re oi pe dia do invasores, irán sucediéndose las torres la línea 1585 IF FO<)=PEN+1 THEN 


Sos6 "PRI RE, Ta !6 é en la pantalla, hasta acabar con todos GOTO 65909. 
EP 0.5,0.5: BEEP AÚSE” 


Las RINT O PAPER S; ATO (td ellos. A continuación, en la línea 7000, 

ODE ANT RIA DT FME Ri encontramos la subrutina en la que se 

2050 IF s$='s" THEN RUN cambia la mejor puntuación se reini- sosietta sita di 

2960 POR Nei TO 255. OUT 254,n: 5 Y 

O Cn eo | dino fa aaa A RA 
Se ONA TECLA PARA COMENTAR”: PAU Mediante la variable FUEL, se nos in- 

SE O à ; y SRE&T! 

3030 CLS dica el combustible que tiene la nave; con PEER o 


3100 PAUSE 25: RETURN 


SS | NAVES, el número de vidas que le que- 
26 MICROHOBBY 








6 
nei8 epa 3566. GO SUB 9000: 
O ema 

o 4 
ND C$<>"a” C$<>"1* AND C 
O" AND C$<>"A” AND C$&<>"L” THEN 


> Í IF C$=“L" OR C$="L" THEN GO 
TO 600 


E B$ (6) AT PFN,1,AS(S),AT PFN 
520 IF C$="q” THEN LET PFEN=PFN- 


S30 IF C$="0" THEN LET PFN=PFN- 
S40 IF C$="a” THEN LET PFEN=PEN+ 
SSO IF C$="A”“ THEN LET PEN=PEN+ 


S60 IF PFN<1 THEN LET PFN=1 
570 IF PFN>20 THEN GO SUB 600 
mi aa AT PFN,1,AS(1);AT PFN 


+1 ; + dr 
So R TURN 
600 FOR V=1 TO NM 
6OS IF PFN+41=F(UV) AND C(V)=1 TH 
EN GO TO 650 
610 NEXT U 
(620 PRINT OVER 1; INK 6;AT PEN+ 


"636 SRINT OVER 1; INK 6;AT PEN+ 


















R 1;D$(1 TO P(U)-5) 

651 BEEP .001,40 

6S2 PRINT AT PFN+1,4; INK 6; OU 
ER 1;D$(1 TO P(V) -S) 

68 INK 7: PRINT AT F(UI,PIV);"* 
+": BEEP .005,8: PRINT AT F(V),P 
(VU); E”. BEEP .005,6: PRINT AT F 
(VU) ,P(V);! *": BEEP ,4 

70 LET C(UV)=0: LET NMM=NMM+4 1: 

T PUNTOS=PUNTOS+10 

us RINT HO;AT 0,19; “PUNTOS:"; 


FOR = 
BORDER 2: BORDER 6: 
720 NEXT U 
730 LET PANT=PANT+1: LET PUNTOS 
=PUNTOS+FUEL +10+FUEL 
735 PRINT BO;AT 0,19; “PUNTOS:"; 
PUNTOS 
740 IF PANT<=12 THEN CLS So 7 


o 2145 
750 LET L$=' HAS CONSEGUIDO EL 
IMINAR LOS INVASORES DE LAS 
DOCE TORRES. EL ALTO MANDO AGRA 
DECIDO,TE CON-CEDE UNAS LARGAS 
ACACIONES" 

760 PRINT HBO;AT 0,0;". a 

770 FOR B=1 TO LEN L$: BEFP .os 
,30: PRINT L$(B);: NEXT B 

780 PRINT AT 20,1; "“PULSA UNA TE 
CLA PARA CONTINUAR” 

790 PAUSE O 

B00 BEEP .0S,4O: BEEP 
EEP .1,42: GO TO 7000 
1500 GÓ sus Soo. REM 


1520 LET FUEL = FUE NT AT O 
no e AT 18; FUEL IF FUEL <= 

4* SHEN co TO “so 

1530 LET FTT= INTO (RND$FT) 

1540 FOR U=0 TO FTT 

1545 IF FTT=U THEN GO TO 1600 

1550 LET X=INT (RNDANM+41): IF C( 

X) =0 THEN NEXT U 

1555 IF C(X)=0 THEN NEXT U 










1560 PRINT AT F(X),1; INK 3; QUE 

1,ES(2 TO P(x)) j 

BEES "Go 1 26 BEEP .001,30; 
AT F(X),1; 

RsdoE$/2 TO Pix) PERSA AO 

0880 IF F(X)=PFN THEN GO SUB 600 

1599 

1600 GO 

2000 REM 

2018 LET 






ESPERA UNOS SEGUNDOS wy 
ULSA UNA TECLA P 
2050 LET aci ARA JUGAR+sH44+ 


2025 FOR P=31 TO O STEP -1: PRIN 
T AT 10,P;Z$(1 TO HA): 
+1: BEEÊP .05,30: PAUSE 1: NEXT P 
2030 FOR V=2 TO LEN Z$ 

2040 IF v<LEN Z$-32 THEN PRINT A 
T 10, SEE TO V+31) 


:u 


2050 IF v>=LEN Z4-52 THEN PRINT 

AT 10 Z$(U+1 TO ) 

2060 bEÉE 05,30: NEXT U 

2100 DIM AS(6,3): DIM $ (6,31, 

ET Ag(1)=""4E": LET B$(1)=" Hs 
ET Agtad)a” “EL B$(2)=" * 

o LET AS(3) =" dh: T B$(3)="" 

PU: LET Ascs)="W4": LET B$(4)= 


CR ii CET AS(S) ="mago: LET B$(s 

Va LET AS(6)=" “ LET BS 
=** “+. 

2102 DIM P(16): DIM F(16): DIM C 

416): DIM G$(22,11): LET Gs (2) = 

Es Ema E": LET NAVES=3: LET A 


pias LET M$=' RR LET N 





2116 LET PF$8=" 2 NADA NO 


213 STORE 9000: GO SUB 9000 
2135 LET FUEL =99: LET PUNTOS=0; 
LET PANT=1: LET PFN=11 

2140 IF INKEY$="'" THEN GO TO 214 


a) 
2145 LET be dp: 1A LET NMM=0: GO 


SUB 3000 +PANT 419 

2150 BOR 1: PAPER O: 

E aiii? 18,22; LET GS (U) =“m 
TO NM 


Sis CÉBR O SETE (O) 44) eNGII TO P(U) 
-20) +M$(P (UV) -19 TO 11) 

2159 NEXT U 

2160 FOR U=1 TO 22: PRINT AT U-1 
et] ra ri O; INK 6, TAB 21,6$(U) 


Era PRINT AT 21,0; INK 7;F$(1 T 


2170 FOR V=1 TO NM: PRINT INK 4; 
ATOR (UI PIUS Pg NEXT UU 
2180 INK 7. ER NT AT PEN,1;A$(1) 


:AT PFN+41 B$(1 
2210 PRINT nO AT. 0,1; “NAVES: “'; NA 
VES;AT 0,10, FLASH 1;AF;AT 0,19; 


FLASH Q; "PUNTOS: "; PUNTOS 
vindo qe V=1 TO PANT: PRINT AT OQ 


1; NEXT U 
g236' ERRA AT 0,13; "FUEL: "; FUEL 







- LET FT=2: RESTORE 
3105 FOR V=1 TO NM: LET C(V)=1: 
READ FU): READ PV): NEXT U 
3120 DATA 2,24,4,29,6,21,8,26,11 


,/23,13,28,14,26,18,26,19,22 
3166 RETUR 






a LET FT=4: RESTORE 
3205 FOR V=1 TO NM: LET A nd Pi 





READ FIV). READ PLU E NEXT 

3220 DATA 4,25,6,23, 10 “os, 1 
24,15,25,16,22,18 4º 256) 26 

3486' RETU 

3299 REM 


pt LET NM= LET FT=4: RESTOR 


20 
3305 FOR V=1 TO NM: LET C(V)=1: 
READ F(U): RERD P(UV): NEXT y. 
3320 DATA 2,28,4,23,6,25,8, 10 

,/27,12,24,14,25,16,29,18,26, “5018 


3370 RETUR 

3399 REM 

3400 LET NM= | LET FT=S: RESTOR 
E 3420 

3405 FOR U=1 TO NM: LET dd bao 
READ F(V): READ P(yU): pera 


3420 DATA 2,28,5,25,8 or 27,1 
2,25,13,84,14,83,18,28,1 16] 26,26, 


a 
3458 RETURN 
3499 REM 
3500 LET = | LET FT=S5; RESTOR 


E 3520 
3505 FOR VU=1 TO NM: a a ad 








READ FíU): READ P(V)- TU 
3520 DATA 2,26,3,21,5,30,7,25,9 
24,11,23,13,23,15,23,17,27,18,25 


,19,23 

3575 En E 

3600 LET NM= |: LET FT=S: RESTOR 
E 3620 


3599 REM 

3610 FOR V=1 TO NM: LET C(U)=4: 

READ FIV): REBD P(V): NEXT y 

3620 DATA 2,24,4,30,5 6,28,8, 

30,9,29,10, 2813/50 14º 26 i4,28, 
27,19,21 


17 

36560 RETÚR 

3699 REM 

3700 LET NM=13: LET FT=6: RESTOR 
E 3720 

3710 FOR U=1 TO NM: LET A nba 
READ F(íV): READ ge Saga Na 


3720 DATA 2,23, 12º 22, 6: 2o 5, 
25,9,22,11, as a ai 6] ,22 
6,23 16" 54º 


16, 

3755 RETURN 

3799 REM 

3800 LET NM=14: LET FT=6: RESTOR 
E 3820 

3810 FOR U=1 TO NM: LET C(U)=1: 
READ FíV): READ PíV): NEXT U 
3820 DATA 3,29,4,29,6,29,7,29,8, 
27,9,27 

3825 DATA, 11, 2? 27,13,25,14,2 
S5,16,25 16) 54 2é 

3860 ETURE 

3899 REM 

3900 LET NM=15S: LET FT=7: RESTOR 
E 3920 


3910 FOR U=1 TO NM: LET C(U)=1: 
READ F(íU): READ P(U): NEXT U 
3920 DATA 2,27,3,26,4,25,5,24,6, 


es 
3925 DATA 8,27,9,26,10,25,11,24, 





12,23 

3930 DATA 14,27,15,26,16,25,17,2 
4,18,23 

3940 RETURN 


REM PRM 
4900 LET NM=16: LET FT=8: RESTOR 


4020 
4010 FOR U=1 TO NM: LET C(U)=1: 
READ F(U): READ P(U): NEXT U 


258. DATA 2,22,3,23,4,22,6, 22,27, 


8,22 
Sea. DATA 10,30,11,29,12,28,13,2 


6 
4636' DATA 15,25,16,24,17, 
2,19,21 Ep a 


4040 RETU 
4099 REM Pro 
agr M=16: LET FT=10: RESTO 


RE 2 
4110 FOR VU=1 TO NM: LET C(U)=4: 





READ FIV): READ P(VI: NEXT U 
4120 D DATA 3 23,4,24,5,25,6,26,7, 
168 BATA io 30,11,29,12,26,13,2 
7,14 25,16,24,1%,23 
4130 RETU TER 
4199 REM 
4200 LET NM= LET FT=12: RESTO 
RE 4220 
4210 FOR U=1 TO NM: LET C(U)=1: 
READ FU): READ P(V): NEXT U 

220 DATA 2, 3 23, 4,23,5,23,6, 


3,0/2348, 23; ET 






“ R'11,25, EM 25,13,25,14,2 
5,15,22,16,22,17,22,18,22 

4240 RETURN 

s999 REM 

6000 REM 

6910 IF p SR HEN FN=20 
6020 FOR V=2 TO 6 

6030 PRINT AT PFN,1;AS(V);AT PEN 
+1,1,B$(U) 

6040 BEEP .04,20-U 


60S0 NEXT U: LET FUEL=99: LET NA 


4 
6070 CLS j INK 7: GO TO 7000 
=PFN ua eo 
6510 PRINT AT V,I,ASCI),AT V+41,1 


$ ( 

eo BEEP .11,20 

- PRINT AT U,1,AS(GI,AT V+41,1 
3 

3 


) 

NEXT v 

LET PFN=20. GO TO 6000 

7000 CLS LET K$="HAS CONSEGUID 

O LA MEJOR PUNTURA- CION.GRABA TU 
NOMBRE PULSANDO LAS TECLAS CO 

RRESPONDIENTES (MAXIMO 12 LE 

TRAS) PULSA O PARA CONT INUAR" 

4 IF PUNTOS<=AF THEN GO TO 70 


7020 FOR U=1 TO LEN Ny PRINT K$ 
(U);: BEEP .05,460: 
PRINT AT 
Ntê 


7030. LET T&=INKEY 
APUNTOS) AT 7,10;7 LET AF=PU 


7040 FOR N=1 TO 11 
7045 IF INKEY$="" THEN GO TO 704 


s 
7247 IF INKEY$="0" THEN GO TO 70 
7050 9 LET T$=T$S+INKEYS$S: PRINT AT 
2658" Tê INKEY$<>"" THEN GO TO 70 


7060 NEXT N 

Pá da na UE AT7,2;AF;AT 7,10;TS; 
AT "EL MEJÓR 

>080 "PRINT AT 20, 0; “++PULSA UNA 

TECLA PARA JUGAR44" 

7085 FOR v=0 TO 100: NEXT v 

7090 IF INKEy$="" THEN FOR V=1 T 
O NM: LET C(U)=1: NEXT U: GO TO 


7095 LET NAVES=3 
Go 7 







e PUMA: 
254 e UPA 2,0 
255,60,0,6,0 
9/0 188.64 ,58, 31 
g ,22,2584,12,62,65,6 
9935 DATA a: 206 68 SÃO MCSA 
9040 DATA 0,171,1,15,255,255,63, 
9045 DATA 0,171,0,240,136,132,19 









5658 DATA ads 14d 268 /248/0,0,0, 
S060 DATA O, 2,82, 116412,14,7,7 

9065 DATA O, ,56,185,251,25 
So7e DATA 0,4 ,40,112,224,224,192 
9088 DATA ass (254 ide 62 /66/28,2 
4685 DATA 240,252,224,96,32,16,8 
4890 DATA 133,16,66,20,1,68,16,6 


9095 DATA 17,68,144,0,66,16, ad “ 
a E et 118, 115, is 238, 14 


9,11 
9105 DATA 60 

91180 DATA 669 A 88: 8 “66 

9115 RETURN 
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UTILIDADES 


CARGA Y ALMACENAMIENTO | 
DE PROGRAMAS CON | 
VELOCIDAD VARIABLE (y HI 


Paco MARTIN y José María DIAZ 


Con este artículo, se completa la trilogia que hemos 
dedicado a un tema especialmente interesante en 
código máquina: la posibilidad de elegir la velocidad 
de transferenda cassette-ordenador, o lo que es lo 
mismo, cómo conseguir programar más deprisa o más 
despaco que el standar permitido. Con ello, esperamos 
haber satisfecho a nuestros lectores y haber dejado 
daro un tema tan complejo y atractivo como el 








expuesto. 
Ro as 
BAUDIO CALL NUMERO OBTIENE EL NUMERO DE LA LINEA DE COMANDO 
PUSH HI SINTAX INC HL ANALIZA QUE LA SINTAXIS ES CORRECTA Y BIFURCA A LA 
(eos SUBRUTINA CORRESPONDIENTE. 
PP NZERRORC LD AMU 
LD HUM EL RANGO DEBE ESTAR COMPRENDIDO ENTRE 8] | Y CP 8 
add. JR ZPPROG 
Sac HLDE CP 22: LINE 
JP NCERRORE JR ZPROGL 
AND À CP 17) : SCREENS 
LD HLdda R ZSPANT 
Sc. HLOF CP 175: C0DE 
JP CERROR JR ZOODE 
LD DEPRES) TOMA EL NUMERO DIVIDIDO POR 14 JP ERRORC 
LD (BAVDIDE PARA ASIGNAR LA VELOCIDAD E 4 
CALL INVAL E INICIALIZA VALORES PROG LD HLSddd SENAL “NO AUTOEJECUCION 
POP HL LD (DIAL 
NC HL TIPO XOR A ASIGNACION DE VALORES PARA LA CABECERA 
LD AMI LD (CABECA 
ns LD DEZ) 
JP NZERRORA LD HUM 
NC HU SC HLDE 
RET LD (INFCHL 
LO  HLI23H) 
NAME LD Bi SENAL “10 CARACTERES PARA EL NOMBRE” UF 
[D DENOMBRE DIRECCION DEL BUFFER DEL “NOMBRE SBC HLDE 
PNAME LD AMU LD (LONTHL 
(Due SC 
JR IMP RET . 
LD IDEA EL "NOMBRE" DEL BLOQUE QUEDA ALMACENADO PROGL CALL ENUM TOMA EL VALOR NUMERICO SIGUIENTE AL TOKEN LINE: SI ES 
NC HL MAYOR DE 9999, ERRORB 
NC DE LD HLI 
DINZ PNAME S8o HLDE 
| AMU JP  CERRORB 
os LD (DIMDE 
BET 2 CALL TIPO 
SCE SENAL “NOMBRE DEMASIADO LARGO" RET 
RET 
CM 1 A9 MIRA SI EXISTE UN “NOMBRE” SBANT INC H MIRA QUE EL SIGUIENT CARACTER SEA ENTER 
( B LD AML 
| AR SE COMPLETAN CON ESPACIOS LOS 1) CARACTERES CP 1 
LLENA LD (DEA JP NZERRORC 
NC DE tl Hi ASIGNA LOS VALORES NECESARIOS Y RETORNA 
RET LD  HLOM 
LD (ONT 
CPNAME LD AML COMPRUEBA QUE “NOMBRE” FINALIZA NSA LD HuSgdg 
o Ar CON COMILLAS LD (INFCIHL 
JP NZERRORE | 43 
DD ASF SENAL “NOMBRE NO ESPECIFICADO”. LD (CABECA 
LD INOMBREJA RET 
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CODE INCH ANALIZA SÍ SE HA ESPECIFICADO LA DIRECCION 





LD AMU 
o A 
DM SEAL “DIRECCION NO ESPECIFICADA" 
RET 2 
DEC HL 
CALL NUMERO TOMA EL VALOR DE LA DIRECCION 
LD (DIATDE 
CALL COMDAT 
LD AMU 
CP 4 
DD A SENAL “DIRECCION ESPECIFICADA” 
BET 7 
JR DEFLON 
NUMERO LD DEQ INICIALIZA EL VALOR A CERO 
CRNUM INC HL APUNTA AL SIGUIENTE CARACTER 
LD AMU TOMA EL DATO 
Ce LES MAYOR QUE 9º 
RET NC RETORNA Si ES ASI 
Ce 4 ES MENOR QUE “Q "? 
BET C RETORNA Si ES AS) 
SUB 4 AJUSTA EL VALOR ASCII A DECIMAL 
PUSH HL PRESERVA EL PUNTERO 
LD PRESIDE ALMACENA EL NUMERO CALOULADO 
Ex DEM INTERCAMBIA VALORES 
Í CALL MUU OPERACION HL=HL'1Q 
E LD Dj 
x DD EA 
cine ADD HLDE ERA EL NUEVO VALOR, QUE NO DEBE SER MAYOR QUE 
JP CERRORB 
EX DEHL 
CODE CAL NUMERO TOMA LOS DATOS DE DIRECCION Y LONGITUD A LA VEZ QUE POP HL 
CHEQUEA SINTAXIS JR CRNUM 
LD (DATE 
CALL COMDAT PRES DEFW 
DEFLON LD AML) 
o < MULT ADD HLHL HL=NUMERO"2 
JP NZERRORC JP CERRORB 
CALL ENUM LD Dk COPIA HL EN DE 
LD ONTDE |O EL 
CALL COMDAT ADO HLHL HL=NUMERO'4 
BR INA JP CERRORB 
ADD HLHL HL:NUMERO'& 
COMDAT LD AD CHEQUEA QUE Si EL NUMERO ES CERO, EXISTIA AL MENOS JP CERRORB 
UN ASCI |" ADD HLDE HL= NUMERO + NUMERO'2 
OR E PP CERRORB 
REI NZ RET 
DEC H 
LO Am INVAL LD DEDATSAY TOMA LA DIRECCION DEL DATA PARA AJUSTAR VALORES EN 
Pq LA OPERACION SAVE EFECTUANDO EL CALCULO A CONTINUA 
JP NZERRORC CION 
e CALL CALGUL 
= LD HLBUEFER 
DD AMU EL REGISTRO HL SE UTILIZA COMO PUNTERO DE LOS DATOS 
é ENUM CALL NUMERO TOMA EL ULTIMO NUMERO ESPECIFICADO OBTENIDOS. 
Pu Y ANALIZA QUE EL SIGUIENTE SEA INSERTA LOS VALORES ADECUADOS EN LAS POSICIONES CO: 
JP NZERRORC ENTER: SI NO, ERRORC RRESPONDIENTES PARA LA OPERAÇION “SAVE” 
RET LD  (DSI42A 
4 INC HL 
LD AMU 
NSNT  XOR A CONTINUA ANALIZANDO LA SINTAXIS DE VERIFY Y LOAD BI. ID OSHA 
FURCANDO A LA SUBRUTINA ADECUADA NC HU 
:D LD DSMA 
ING HL INCH 
DD AMU |D AL) 
Rue SEAL “PROGRAMA BASIC” LD (DM+IA 
tá em LD DEDITIOA EFECTUA LA MMA OPERACION PARA 
MET 1 , CALL CALCUL “LOAD”, VERIFY”, MERGE” 
Y ed LD AMU 
NEG 
CP nq “SCREENS LD (DU+IA 
JR ZICODE NEG 
JP ERRORC D OLA 
| NC H 
LPANT a er ASIGNA VALORES PARA “LOAD” - VERIFY" DE PANTALLA A AJHL) 
RET LD (DHMA 


> 
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NCALO 


DONT 
BUFFER 
BAUO 
DATSAY 


CABEC 
NOMBRE 


DIAT 
INF 

BUFCAB 
BUFNAM 
LONBUF 


DIBUF 
INFBUF 


LOM 


LBREAK 
LSTART 


LOMAM 


DEFB 
DEFS 


DEFW 


SE 


SsSHSGagE=ES6CRN 


DINZ 


HL 
AJAL) 


(DLS+ A 


84 


5986.62.49 
Hj 85280 


1 
"M. HOBBY" 


= fa 


Caça 


40 587 
NOLBREAK 
HLHG 455 
LOWAIT 


30 MICROHOBBY 


ESTA SUBRUTINA EFECTUA EL CALCULO (DDAT)"150/BAUD) 
SE VAN A CALCULAR 4 VALORES 

SE INICIALIZA EL PUNTERO DE 

DIRECCION DONDE SE VA A COLOCAR EL RESULTADO DEL 
CALCULO 

TOMA EL PRIMER VALOR A CALCULAR 


OPERACION HL=HL'DE 


TOMA EL VALOR DE LOS BAUDIOS Y LO ALMAGENA EN EL 
STACK 


SE DIVIDEN AMBOS VALORES 
RECUPERA EN A EL RESULTADO 
EL RESULTADO QUEDA ALMACENADO 


EL PUNTERO SE INCREMENTA 


SE EFECTUA LA MISMA OPERACION QUE EN LA ROM, SALVO 
QUE COLOCAMOS NUESTROS PROPIOS VALORES CALGULA- 
DOS ANTERIORMENTE EN LOS LUGARES SENALADOS CON 
UNA * 


LEADER 


LOSYNC 


DU 


LDFLAG 


VERIPY 


LONEXT 
LODEG 
Du 
MARKER 
LDBITS 


OL3 


DLs 


SAFLAG 


SLEAD 


XOR 


NZ 
Al 


CA 

DE 
LODEG 
AX+0) 
L 


NZ 
IX 


DE LA MISMA MANERA QUE EN “LORD”, INTRODUGIMOS 
NUESTROS PROPIOS VALORES 





— dit 


4 





| BM 
DE L 


SSTART 


JR  NZSLEA 
DEC B 
DEC h SPARIT 
JP er 
| dB T 
SSINGI  DINZ cs erva 
OUT (FEIA 
' HO SABiT! 
| BM DS? 
SSNCa  DINZ SSINCA SASET 
OUT (FFEJA SAQUT 
1 LD BORBGE: Ds? 
EX AFAF 
| LA 
JP  SSART 
SALOOP LD AD 
OR E SABITS 
JR  ZSPART 
D LiX+0) 
LPARTT LD AH 
KR L DS4 


FARO 
1 RESTORE : LET che 
+ «AnBESIO heck=0: PRIN 
2 FOR i=1 to 1026: READ à: PO 


KE 59999,a: LET check=check+sa: N 
1 
3 PRINT check;” “; (“in AND c 
RODO ho "correr to 
É 10 DATA 63,92 98, 126,254,23 
'20 DATA 126,254,58,32,24,935,12 
6,254,248,4 
DATA 28,254,239,202,27,235, 
ama” 214,202,254 ' 
28. DATA. 234 ,254,213,40,82,24,2 
j BATO! 08 207,10,207,11,207,14 
287, 26 


BATA 254,2935,205,45,236,56, 
ass, 208 88,236 
DATA 245,62,253,205,1,22,17 


Ss, Ka 41 
80 DATÁ 205,10,12,253,203,2,23 
8, 2ºs 212,21 
DATA 1222 33,294,237,17,17,0 


198, 20s, 
1900 DATA 288,6, 50,118,16,253,24 


1,237 4s 
1120 BAT ATá 237,62,255,221,42,83,9 


120 DATA 42,247,237,205,153,23 
,201, 20s 254, 235 “ 
130 Tá «285» 45,2936,220,76,236, 


Asa 167,205,174, 
15,6 ,258, REST ao 


DATA 3,247,54,128,2935, 
29,229,221,425 ' PR a 
160 DÁTA 62,255,205,116,235,195 
205,8 9 


DATA 235,253,203,37,134,48, 


ESG DATA! SS 235,205,4 

,76,236 205 241 ER a 

196 DAT 2se, (245 ,205,174,295, 24 

1,201 End g 

o: Bis ATA "12450 Sos, 37,198,48,88,2 
1 


BATA 42,83,92,25,23 
côsês 237 icone 


ão DATA 82,56,10,40,8,68,77,23 
E) DATA 25,24,11,25,235,167,23 
240 DATA 235,205,85,22,42,83,92 
232 ,7S,1 
s2 EA o DATA 238,9,34,75,92,42,8,23 
250 GATA 192,32,7,934,66,92,253, 
E) DATA 237,91,6,2938,221,42,83 


"286º6 DATA 253,203,37,70,40, 
40,1,55, 
2os 12,236 
Só DATA 216,195,143,234,167,32 
1 221,33,8 
06 DATA 64,237,91,245,237,42,6 
o 167,237 
310 DATA B2,194,143,234,24,218, 
254 48,10 
26 ATA 221,42,8,238,237,91,6, 
238 24,204 
336 DATA 221,42,247,237,32,2,24 
Das, 237 
340 DATA 245,237,24,190,221,33, 
251,237,17 
356 DATA 0,175,55,205,12,238,48 
,242,253,203 
360 DATA 2,134,253,54,82,3,33,2 
34,237 
370 DATA 128,58,251,237,190,32, 
pas erEPadao, 
48,217,17,192,9,197 
205,10,12 ' 


LD 
LD 


JP 


JR 
É 
Bi 
DINZ 
JR 
L 
DINZ 
QuT 
LD 
JR 
DEC 
XOR 
ING 
AL 
JP 
DEC 
ING 
LD 


SASET 
(PFELA 
BRE 
NZSABIT? 
B 

- 

- 


L 
NZSABT! 
DE 


IX 
Bm; 





CARGADOR DE LA RUTINA DE CARGA VARIABLE 


390 PA 193,17,252,237,33,235, 


257 
196 
FE 2 
35 Ata 
ss 


26 

ao «SA ATÁ 60,32,3,121,128,79,26, 

16 “SATA 32, ,1,12,215,16,246,203 

A 62,13,215,201,205,43,2 
254 

28,28 194,139,234,33,31,3,23 


7,82, dão 137 
440 DATA 2934,167,33,136,19,237, 
R6ô LATAS 234 


4 
ad GEO ,205,97 


$37,91,76,297,297,83,2 


O DATA 237,225,935,126,254,34, 
194,135 AfA 2 3 


, 254 ,34 
480 
aa. Já 
0" 


261,6,10,17,295,297,12 


BATA 11,18,935,19,16,246,126 


oDALP 55,201,62,9,184,62,32, 
1854 “SATA 252,201,126,254,34,194 


41,234 62,255 
510 DATÁ 56,235,237,201,935,126, 


es4, 18 4 


2,1 
Ra DÁTA 254,202,40,44,254,170, 


“248 BATA! 
dia: Bata 
81,8 

só 
re BATA 


92, 
DATA 


26566, 195,139,234,33,0 


sato ,175,50,234,237,237 
75,92,237,82,34,249,23 


92 
S5,297,62,34,245,237,5 


Ps Gi do ,232 


TA 


236,33,15,39,297,82,21 


8,137,234,237 
$80 DATA 83,247,237,205,115,236 


204,35 126 
5980 DATA 

,34,247,237 
06. 


DATA 


54 
13,194,139,234,33,0,64 
33,0,27,34,245,237,33, 


34 
“cio S BATA 249,237,62,3,50,234,23 


?, 481,20 5,43 


ATA 


286 ,836 
530 TA. 


236, 237 
TÃO 


ao asa” ,83,247,237,205 


126 


54 
44,104, 139,234,205,232 
545º os, 220,236,24,216 


Sé, 229 153 43 
se TA, 


35 20 
'B6ó BATÊ 


.126 254,48,194,139,234 
2545 254,13,194,139,234 


,201,175 sê 234 
6780 DATÁ 


“SsO BATA” 


17 ,254,17 
690 DATA 


247,35,126,254,13,55,2 
294,297,126,254,170,40 
8,195,139,294,205,161, 


“206 DATA iê 3 


700 DATA 


s 
126,254,13,62,1,200,43 


805,4 237 
710 DATA 2937,83,247,237,205,220 
236, 126,254,13 
220 AS8T TA 62,2,200,24,159,17,0,0 
336" DATA 254,58,208,254,48,216, 
aié 48,229,23 
qa PÃa CORA POR SDTVnOR OU 78) 
“Seo ESSAS 25,218,1937,234,235,225 
84,22 


6 
DATA 


1,818,197,894 
278 DA 


ATA 


155º 034 Boi 
786 DATA 


588,899 
790 DATÁ 


506 DATA 


41,218,137,234,84,93,4 
"41 216,197,294,25,218, 
225,297, 205,162,237,33 
282, 238,35,126,50,240, 
“456, 238,35,126,50,5,23 


NC A 
dP  NZSALOOP 
| BNB 


SDELAY DINZ SDELAY 


9,17,230,237 

éio' DATA 205,162,237,33,220,237 

,126,237,68,5 

820 SATA 92,238,935,126,237,68,5 

8 os 238,35 

E: 8 DATA 126,237,68,50,133,238, 
126,237,68 

costas DATA 6º 138,238,201,6,4,33, 


só SATA 218,237,197,26,213,33, 


não. 2,22,0 
866 DATA 95,205,169,48,68,77,19 


7,297,75,224 
é70 BP TÁ 297,205,43,45,193,229, 
205º 45,209 
88 86“ BATA! aos 175,49,205,162,45, 
42,218,237,11 
DÁ ATA 35,34,218,237,209,19,1 
93,16,209,201 
968 DATA 0,0,0,0,0,0,150,0,59,6 
-918 DATA 62,49,80,78,53,80,0,12 
920 DATA 46,32,72,79,66,66,89,0 
1258 DATA 0,0,0,0,0,13,10,8,255, 
940 DATA 129,129,129,129,0,0,0, 
956 DATA 20,8,21,243,62,15,211, 
254 ,35,63 
66 DATA e) 229,219,254,31,2380,3 


2, 246 
“SETA 191,192,205,2931,5,48,2 


so, 

EE Sata * 16,254,43,124,181,32,2 
49,205,227, 

a40 DATA 48,235,6,156,205,227,5 


62 

606" “esta 198,184,48,224,36,32,2 
10 DATÁ 231,5,48,213,120,254,2 
O 244, 

20 oP ETA 231,5,208,121,238,3,79 


| paes qa pé 


arennosnar aa 


8,0,6 
56º DATA 176,24,31,8,932,7,48,15 
21,117 
4 
2 


pá. 


pos 


0 DATA 0,24,15,203,17,173,192 
so DATA 19,24,7,221,126,0,173, 
192 221,35 

266 D DATA 27,8,6,178,46,1,205,22 
2686 DATA se saem; 184,203,21,6,17 
6,210,128,2 
1080 DATA 134, 173, 103,122,179,32 

os, 124 254,1 
ioso O TÁ 201,33,63,5,229,933,128 

31 127 
17066 EM 40,3,33,152,12,8,19,22 

23,848 
110 DATA 62,2,71,16,254,211,254 
38,15 

"DATA 164,45,32,245,5,37,242 
O DATA 47,16,254,211,254,62,1 
! DATA 254,211,254,1,14,59,8, 
ó PALA 238,122,179,40,12,221, 
124, 173 
ô SATA 103,62,1,55,195,252,23 
08,24 ,244 
Zº DATÁ 121,203,120,16,254,48, 


66 
Só ndo E ada 254,6,62,32,23 


eta 
lag 


SNpêeanuUsy 
O- as 


PO PePRORpE pp. pa pipa 
sea Rad ab qa A req 
odpna 


s 
sê TAS ,203,21,194,295,298,27, 


221,935,6 

1806 DATA E 62,127,219,254,31,288, 

1210 DATA 238,6,59,16,254,201 
ea Çços 
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Software 
cHay en Espahfia alguna 
casa importadora de Soft- 
ware para el ZX Spectrum 
que trate directamente con 
el público? Si es así, ruego 
pongan dirección y teléfono. 


Xavier PARIS RUBIO-Barcelona 


|| Efectivamente existen al- 
gunas casas de software 
que tratan directamente con 
el público; por ejemplo, Dl- 
NAMIC SOFTWARE. Encon- 
trará su dirección y teléfono 
en cualquiera de nuestras 
revistas. 


Conectar periféricos 

Creo saber que a los orde- 
nadores se les puede conec- 
tar juegos (en cassettes), y 
tengo entendido que tam- 
bién se necesita un Micro- 
drive. 

—é El ordenador no es su- 
ficientemente capaz de rea- 
lizar lo que está programado 
en la cinta? o ces un apara- 
to que sirve como amplifica- 
dor de velocidad? 

En caso de que sea uno 
u otro edónde se conecta el 
juego y el microdrive al orde- 
nador? o ése conecta el jue- 
go al microdrive y éste al or- 
denador? 

—cLos interfaces son 
adaptadores entre el ordena- 
dor y otra cosa?, si es cier- 
to, icuáles son las cosas 
que necesitan interface? 

—< El ordenador es capaz 
de utilizar sus teclas para ju- 
gar con algún juego que se 
compre? o enecesita com- 
prar mandos suplementa- 
rios? y edónde se conectan? 

—sMe podrían explicar 
qué significa «Programas en 
cartucho» (microdrive) para 
Spectrum? 


Juan Carlos BOTELLA-Málaga 


|] Alos ordenadores se les 
puede conectar directamen- 
te o mediante «interfaces», 
una gran variedad de perifé- 
ricos, como floppy disks, im- 
presoras y desde luego, cas- 
settes. En estos últimos, 
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puede introducirse cintas 
que contengan todo tipo de 
programas, bien sean de jue- 
gos o de utilidades. Lo que 
el Spectrum hace con ellas 
es cargar dentro de su me- 
moria el programa que con- 
tienen y ejecutarlo acto se- 
guido, o sea, que sí es capaz 
de bregar con ello sin nin- 
gún problema. 

Sin embargo, existen 
adaptados a otro tipo de pe- 
riférico para el Spectrum, el 
microdrive, y lógicamente, 
vienen en cartuchos de cin- 
ta específicos para ese fin. 
Estos últimos no podrian 
cargarse y ejecutarse desde 
una cassette. 


Monitores de todo tipo 

Me quiero comprar un 
monitor para un ZX Spec- 
trum 16 K pero chay que 
comprarse forzosamente el 
particular para Spectrum o 
puede ser otro? 

Si es otro «puede conec- 
tarse directamente del orde- 
nador al monitor o el Spec- 
trum sólo se puede conectar 
al suyo particular? 


Luis CORRAL-Córdoba 


|| No existe realmente, mo- 
nitor específico de Spec- 
trum, ya que hay varios mo- 
delos en el mercado que es- 
tán previstos para conectar- 
se directamente a nuestro 
ordenador favorito. Si no uti- 
liza alguno de estos monito- 
res, siempre es posible co- 
nectar otro modelo, pero ello 
le obligará a abrir el ordena- 
dor y hacer algunas modifi- 
caciones en la salida de vi- 
deo. La persona que le ven- 
da el monitor, podrá darle 
más detalles sobre el mode- 
lo concreto en el que se ha- 
ya fijado Vd. 


Spectrum Plus 
Me hariíais un favor en- 


viándome información acer- 
ca del nuevo modelo SPEC- 
TRUM PLUS. Muy agradeci- 
do por vuestros servicios. 


Alberto BELART ESQUERRA-Barcelona 


|] El nuevo modelo de 
SPECTRUM PLUS es, inter- 
namente, análogo al llama- 
do Spectrum 48 K. La única 
diferencia consiste en el te- 
clado semiprofesional, bas- 
tante cómodo, y en el precio, 
sensiblemente más alto. 


Una cinta 
que no «Runea» 

Soy suscriptor de su revis- 
ta que, hasta la fecha, reci- 
bo regularmente. La cinta de 
obsequio que me enviaron, 
cuya presentación es impe- 
cable, no «RUNEA». Se tra- 
ta del programa UTILITIES. 
Ya me dirán que solución tie- 
ne el asunto. 

También les agradeceria 
me informaran sobre su 
oferta de programas graba- 
dos. ePor qué del 1 al 147; 
éno seria mejor para com- 
probar la calidad de las gra- 
baciones del 1 al 4, por 
ejemplo? (Suponga que los 
números se refieren a los 
correspondientes a los 
ejemplares semanales de la 
revista). 

Deberian publicar en cada 
número una «fe de erratas» 
(inevitables en toda publica- 
ción) del número anterior. 


Alberto SAGADE MOURIZ.Bejar 


[|] Sila cinta de utilidades 
tiene algún problema, mán- 
denosla por correo y si efec- 
tivamente no carga, le man- 
daremos otra. 

Por un error de imprenta, 
apareció un 14 en lugar de 
un 4. 

La cinta contiene los pro- 
gramas de los números 1 al 
4 inclusive. 


Ordenador 
de informática 

Me gustaría saber si hay 
alguna diferencia entre un 
ordenador de informática o 
uno como el Spectrum 48 K. 
Y si hay diferencia «por qué? 
éCuánto vale un ordenador 
de informática? 


Octavio IZQUIERDO REYBarcelona 


|] Si entiende por ordena- 
dor de informática el típico 
ordenador de gestión utiliza- 
do a nivel de Empresa, la di- 
ferencia con un ordenador 
personal como el Spectrum, 
estriba fundamentalmente, 
en la capacidad de memoria 
(de 20 Mb en adelante) y 
gran velocidad de acceso, y 
cuyos precios superan fácil- 
mente los dos millones de 
pesetas. 


Problemas 
con el Spectrum 

Recientemente he adqui- 
rido un ZX Spectrum de 48 
K y, hasta ahora me funcio- 
naba perfectamente; pero 
ahora me ocurre lo siguien- 
te: cuando estoy tecleando 
un programa me aparece en 
la pantalla: 1.º datos que es- 
taban en otra línea, si sigo 
tecleando el programa me 
aparece casi toda la panta- 
lla con interrogaciones; y si 
sigo tecleando, el ordenador 
emite un sonido cada vez 
que pulso una tecla. 

Quisiera preguntarles a 
qué es debido esto y cómo 
puede solucionarse, y si es 
algo grave. 


Fernando GARCIA-Basauri (Vizcaya) 


|| Su problema se puede 
deber a dos causas diferen- 
tes: 

La primera, y desgracia- 
damente la más probable, es 
que su Spectrum esté estro- 
peado, por lo que no le que- 
dará más remedio que en- 
viarlo a reparar. La segunda 
posibilidad, radica en la for- 
ma de conectarlo. Si al en- 
chufar el ordenador conec- 
tamos primero la clavija que 
va al Spectrum y luego la to- 
ma de corriente del transfor- 
mador de forma brusca, es 
muy corriente que se pro- 
duzca una sobrecarga tem- 
poral que provoque los extra- 
fios fenómenos a los que se 
refiere. Pruebe a enchufar el 
ordenador con el máximo 
cuidado posible y si no se le 
presenta el problema signi- 
fica que, casi con toda segu- 


a 


ridad, su Spectrum funciona 
correctamente. 


Ampliación de memoria 

Dispongo de un Spectrum 
16 K y observo que la mayo- 
ria de las cintas existentes 
en el mercado e incluso las 
que regalan son de 48 K. 
éQué debo hacer?; ese pue- 
de ampliar mi Spectrum 16 
K a 48 K por medio de algún 
dispositivo?; ecuánto me 
costará. Una vez ampliado a 
48 K esirven las cintas 16 K? 


Antonio EPELDE-Zumaia 


|! Puede usted ampliar su 
Spectrum de 16 a 48 K por 
un precio aproximado de 
8.000 pesetas. una vez he- 
cho esto, los programas de 
16 K puede seguirlos utili- 
zando. 


Almacenamiento 
instantáneo 


Ante todo quisiera felici- 
tarles por su revista, pero 
también escribo para cues- 
tionarles las siguientes pre- 
guntas: 

éSe pueden utilizar el ZX- 
Interface 2 y los ZX- 
cartuchos como un sistema 
de almacenamiento isntan- 
táneo y, en caso afirmativo, 
dónde se pueden adquirir 
cartuchos «vírgenes»? 

c Existe en la actualidad a 
la venta algún tipo de cartu- 
chos de aplicaciones? 

éCuánto cuesta cada car- 
tucho y cuántos títulos hay? 


Daniel BORRAS - Vigo 


|! El Interface 2 permite, 
entre otras cosas, utilizar 
cartuchos, pero son de ROM 
(memoria de sólo lectura) o 
de EPROM (memoria de só- 
lo lectura programable); por 
tanto, no resultaria nada 
práctico utilizar estos últi- 
mos como sistema de alma- 
cenamiento instantáneo a 
nivel de base de datos o si- 
milar, dada la dificultad de- 
programación que estos so- 
portes conllevan. No obstan- 


te, si usted tiene la pacien- 
cia necesaria para construir- 
se otro sistema operativo u 
otro lenguaje distinto del Ba- 
sic Sinclair, si podria em- 
plearlos. 

El precio de cada cartu- 
cho ronda las 8.000 pesetas 
y, que nosotros sepamos, no 
contienen programas de 
aplicación. 


Más utilidades 


Seria muy interesante —al 
menos para mi— que los 
programas y la revista se en- 
focara también hacia el 
campo de la gestión (fiche- 
ros y datos), pues a mi mo- 
do de entender, un ordena- 
dor, por muy pequefio que 
sea, deberia estar enfocado 
a este tipo de funciones 
más que a los juegos. 

Sin otro particular, atenta- 
mente: 


A.E.B. 


|! Le agradecemos su su- 
gerencia y aprovechamos 
para comentarle que esto se 
lleva a cabo en la medida de 
lo posible. Procuramos pre- 
sentar programas de utilida- 
des junto con los programas 
de juegos, aunque en la pro- 
porción que creemos refleja 
las preferencias mayorita- 
rias de los usuarios. 


Sonidos raros 


Me gustaria saber cómo 
producir con mi ordenador 
sonidos raros (no notas mu- 
sicales), así como también 
ritmos (a ser posible de ba- 
teria). Me parece que será 
posible, ya que en algunos 
juegos ya he oído sonidos 
bastante raros y que no se 
parecíian en nada a una no- 
ta musical. 

También me gustaríia sa- 
ber cómo dibujar las letras 
que salen al principio de to- 
dos los programas de la ca- 
ra b de la cinta que se da de 
demostración por la compra 
del ordenador. Yo he listado 





los programas y he podido 
ver que no están hechos por 
el modo «G» (Graphics), sino 
que está hecho por una 
o dos sentencias. 


Antonio MASSOT - Andratx (Mallorca) 


|] Creemos que para pro- 
ducir los sonidos que a us- 
ted le interesan debe olvidar- 
se del Basic y realizarlos en 
código máquina, mediante 
experimentación; los deta- 
lles concretos de cómo rea- 
lizar esto, dada su dificultad 
y extensión, quedan más 
allá de esta sección de con- 
sultorio; le recomendamos 
que se dirija a tiendas espe- 
cializadas y consiga libros 
que contengan la ROM de- 
sensamblada del Spectrum. 
En ellos, encontrará referen- 
cias claras y precisas de las 
rutinas ROM escritas para 
ese fin. 


Manual de manejo 


Me gustaria saber si exis- 
te el MANUAL de manejo 
del ZX SPECTRUM 48 K, en 
CASTELLANO, y si es así, 
ruego me comuniquen dón- 
de es posible adquiririo. 


Miguel Angel ZAPATA LOBO 
Collado Mediano (Madrid) 


|| El manual de manejo del 
ZX Spectrum viene incluido 
al comprar su ordenador, to- 
talmente traducido al caste- 
llano; que nosotros sepa- 
mos, no se vende suelto. 

Sin embargo, las tiendas 
especializadas en informáti- 
ca están repletas de libros 
para el Spectrum adaptados 
a todos los niveles de com- 
plejidad; si no le es posible 
obtener el manual, tal vez al- 
guno de éstos satisfaga sus 
necesidades. 


TRUE VIDEO 
e INVERSE VIDEO 


Tengo un Spectrum “de 
48 K desde el mes pasado y, 
poco a poco, voy aprendien- 
do su manejo. Aunque ya he 
hecho mis primeros progra- 
millas, aún me quedan, na- 


turalmente, lagunas que no 
sé resolver. Bueno, mi con- 
sulta es la siguiente: éPara 
que sirven las funciones 
TRUE VIDEO e INVERSE Vl- 
DEO, que están en las teclas 
3y4, respectivamente? Tam- 
bién me preocupa cómo 
conseguir definir gráficos yo 
mismo, pues el manual no 
me ayuda demasiado. 


Joan SANCHO VALERO - Barcelona 


|! Las teclas TRUE VIDEO 
e INVERSE VIDEO sirven pa- 
ra escribir en modo directo 
palabras inversas, es decir, 
intercambiar el papel y la 
tinta que el ordenador em- 
plee en ese momento. 

True Video restituye la si- 
tuación normal. 

Su segunda pregunta, 
acerca de la forma de defi- 
nir gráficos, ya ha sido con- 
testada en números anterio- 
res de la revista. 


Inteligencia artificial 


Mi pregunta es la siguien- 
te: Cómo puede conseguir- 
se que una máquina apren- 
da de sus propios errores? 

Estoy interesado en cono- 
cer los principios básicos y 
la posible bibliografia exis- 
tente en Espafia. 


Manuel MUNOZ - Betanzos (La Coruria) 


|! La pregunta que usted 
nos plantea es la que preo- 
cupa a todos los laborato- 
rios de investigación infor- 
máticos que se ocupan de la 
inteligencia artificial (IA). 

Queda más allá de esta 
sección, debido a la exten- 
sión y complejidad del tema, 
una explicación detallada de 
los métodos que se pueden 
utilizar en IA, aun los más 
elementales. 

Lamentablemente, ape- 
nas existe en nuestro país 
bibliografia sobre el tema y 
mucho menos en nuestro 
idioma. Habrá que esperar 
un tiempo hasta que esto se 
divulge o dirigirse directa- 
mente a importadores para 
obtener información acerca 
de IA. 
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| VENTA DIRECTA | 
' SIN INTERMEDIARIOS | 


ORIC ATMOS- 
COMMODORE 64-16 
UNIDAD DE DISCO 

DATASSETTE-SPECTRUM 48K 
SPECTRUM 64K 
MICRODRIVES-INTERFACE | 
ULTIMOS MODELOS 


Seis meses de garantia 
MICRO (Import). C/ Magallanes, 51 - 


ático. Barcelona 08004. Telf.: 242 19 99, 
(De 7a l0 dela noche) 











. 
[—em— mm 


Mi 
MERO VI MAS 


HACEMOS FACIL 
LA INFORMATICA 
SSINCLAIR é SPECTRAVIDEO 

eCOMMODORE e DRAGON 

SAMSTRAD e APPLE 
— eSPERRY UNIVAC 


Modens (Latuente 63 Colomtua 141 
Teit 253 4 64 “1 458 61 71 
18003 MADRID 78016 MADRID 
Sost Ortega y Conses, 71 , C 
Feit 411 2850 


. Lama 18 
12 cit 258 86 13 
78006 MADRID 


F ? 13 
28096 MADRID 
Frescura, TOO Avda Gaad' 15 
Tel! SA 10 14 


Fei! 7212262 
78004 MADRID OROtS BARCELONA 
E regue! Gonríves 24 Must, ? 

felt 4368 65 fett 891 1036 
OO07 SEGÓOVIA ABANIUFZ IMpdrus 


PRECIOS ESPECIALES 
PARA COLEGIOS 
Y TIENDAS 
COMMODORE 64 
ZX81 1K 
SPECTRUM 48K 
ORIC ATMOS 48K 
MICRODRIVE 
INTERFACE 
JUEGOS (Importados) 


* + + 
Teis.: (93) 242 80 11.319 39 65 
BARCELONA 
Tel. (93) 725 20 59 SABADELL 
(A partir 18.00 horas) 
e. 
MICRO IRAM 
Obispo Laguarda 1, 1º 
08001 BARCELONA 


IMPORTACION DIRECTA 


Artículos Pesetas 


ORIC ATMOS 39.900 
COMMODORE 64 56.000 
COMMODORE C 16 33.000 
UNIDAD DISCO 60.000 
DATASSETTE 10.500 
2X-81 1K 11.500 
SPECTRUM 48K 30.900 
MICRODRIVE 14,500 
14.500 

1.400 


INTERFACE 1 
CARTUCHOS 
SPECTRUM PLUS 45.000 


QL 128 K 110.000 


Envios contra reemvolso 
Seis meses de garantia 
Servicio de reparaciones 
Telef.: 241 55 18 Barcelona 
(93) 726 04 83 SABADELL 
Computer Diskont 
Plaza Blasco de Garay, 17 - 1.º 
08004 BARCELONA 
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SINCLAIR QL 


APLICACIONES 
O Basededatos O Lenguajes 
O Tra! textos O Pascal 
O Hojadecáculo O Forth 
O Gráficos O Ensamblador 


;CONÓCELOS! 


;APRENDE A USARLOS! 


Cursillos de formación 
para disefio de programas 


VISÍTANOS 


Wo 


rld- micro sa. 


k sa Avenida del Medite- 
qa rraneo, 7 

Teléfonos 251 12 00 
y 251 12 09 
Madrid-28007 


E» — 


MICROHOBBY 
CAMBIA DE 
DOMICILIO 


Calle La Granja, 8 
(Polígono Industrial 
de Alcobendas) 


Telf.: 694 32 11 


MICRO-1 


OFERTA SPECTRUM 48 K 
34.700 
CON 6 MESES DE GARANTIA 
VENTA CONTRA REMBOLSO 
SIN GASTOS DE ENVIO. 


VEN À VERNOS! 


C/ JORGE JUAN, Nº 116 
(METRO O'DONNELL) 
[Dirección Fuente del Berro) 

MADRID, TFNO.: 252 88 11 

Nuevo teléfono: 274 53 80 


ANUNCIESE 
EN 
MODULOS 





Teléfono: 654 32 11 
Sefiorita Marisa 
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e INTERCAMBIO programas para 
el Spectrum (poseo más de 300) 
Asimismo deseo intercambiar infor- 
mación con otros usuarios que se 
inicien en el lenguaje ensamblado! 
del Spectrum (Código Máquina). 
Tengo abundante bibliografia. Inte 
resados dirigirse a: Angel G. Ma 
gaz, C! Postas, 13º ASTORGA 
(LEON). Tin: (987) 61 54 35. 

e VENDO Spectrum 48 K. por 
32.000 ptas, casi nuevo, regalo pro- 
gramas. Lote de 4 dJuegos- 
Spectrum («Mundo Mutante», «Atra- 
pado», «Espacio Lib/=» y «Corre Ca 
minos») por 1.900 ptas. Teresa Gi- 
roms Garcia. C/ Tadbarca, 11-4º C 
Alicante-03012. 

e INTERCAMBIO programas para 
ZX Spectrum e instrucciones. ten- 
go cerca de 500 programas y al- 
go menos de instrucciones. Intere- 
sados llamar o escribir mandando 
lista a: Agustin Parbole Jabardo 
Pardo Bazán. 12. Madrid48016. Tfn: 
(91) 413 97 28. 

e VENDO impresora de 80 colum- 
nas con entrada Centronics: Utill- 
za papel normal y sistema de 
arrastre por tracción o fricción; po- 
see varios tipos de letras Tino: (91) 
459 52 38. Preguntar por Francisco. 
e SE VENDE ZX81 comprado en 
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Julio con todas las conexiones, li- 
bro de instrucciones en Castella 
no, fuente de alimentación, 16 K 
RAM pack, inversor de vídeo inter- 
no, joystick de pulsadores. y toda 
mi programoteca consistente en 
mas de 50 programas, incluye las 
12 primeras revistas ZX 

e USUARIO de Spectrum de 48 K 
desea ponerse em contacto con 
usuarios preferentemente en la 
provincia de Córdoba para cambiar 
programas. Mis lítulos son muy va- 
riados incluyendo números 1. Fran- 
cisco José Toledano. Tfn.: (957) 63 
04 79, 

e VENDO ZX Spectrum 48 K con 
gran cantidad de programas impor 
tados y nacionales, libros. casset 
te Horizontes, cables y transforma: 
dor. Todo por 49.000 pts. Pregun 
tar por Alvaro Durán Martinez. 
Ttno.: 952/49 00 45. Einca Arraija- 
nal. Carretera de Cain sin. Alhau- 
rin el Grande (Málaga). 

e VENDO transformador AC para 
3.6,75y9ya220V y 125Y Lla- 
mar al 34 83 59 (Zaragoza). Pre- 
guntar por Fernando. 

e CAMBIO programas Spectrum 
16/48 K. Francisco Frontinan. C/ Es- 
cultor Ramirez, 22. Zaragoza, Tina, 
38 08 34, 


NES Ro — SADES ES EEE qi PA a e 


RUTINAS MICRODRIVE 


Se trata de dos rutinas que permiten cargar del 


microdrive sin auto-run y un catálogo con to- 
do tipo de información 


COPY RS-232 


Este programa le permitirá hacer COPY a tra- 
vés del RS-232 del Interface 1. (Compatible 
EPSON-ADMATE DP-80 y DP-100-STAR) . 


“TAMBIEN... PROGRAMAS A MEDIDA cONSULTENOS 


Nombre 
Domicilio 
Población 
Provincia 


Deseo recibir: 


[) RUTINAS MICRODRIVE 


() COPY RS-232 





ENVIOS CONTRA-REEMBOLSO: MEGASOFT - Aptdo. 94095 - 08080-BARCELONA 


«Sound on Sound, 
una cinta muy Personal)>)> 


La cinta virgen para Personal Computer C1O y 015. 
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Avenida de Fuentemar, 35. Poligono Industrial de Coslada (Madrid). 
Teléfs.: 671 22 00/04 /08/121/16. 
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«SUSCRIBETE A MICROHOBBY V AHORRA 85 PTS! 





(Y PARTICIPA AUTOMATICAMENTE EN NUESTROS SORTEOS ESPECIALES) 


tcortar por esta linea! 


TARJETA DE SUSCRIPCION AHORRO 


Oferta especial para recibir en su domicilio, todo un afio de | 
revista semanal Microhobby con un descuento de 850 ptas., un 
regalo por valor de 2.000 ptas. y participación en todos los sorteos 


CADA MES, UN SORTEO ENTRE 





FECHA LIMITE DE RESPUESTA: LOS SUSCRIPTORES. UN 
30 DE ENERO DE 1985 ORDENADOR QL Y TRES MICRODRIVES 
RESPONDA HOY MISMO! tag id PUEDEN 


Deseo suscribirme a MICROHOBBY durante un aiio por sólo 3.900 PTAS.., lo que me supone un AHORRO DE 850 PTAS. 


El primer número que deseo recibir es el 


e a e e e na uu a a o 4 1 


Enviéme GRATIS, como REGALO, la cinta de programas que le indico con una (X) 
GOLE. cas Em UTILIDADES......... () 10 JUEGOS......... () 


Respondiendo antes de la última semana de noviembre quedo incluido en los TRES SORTEOS de esta oferta, sólo en dos er 


la última semand de diciembre y en uno, en la última semana de enero. JCUANTO ANTES RESPONDA EN MAS 
SORTEOS PARTICIPARE! 


RR corso O SR AS EDAD asas amas 
CR ici dr E e ea 
CMN ssa ir DS SSSIrRIE IS CZE Conidae pane Dra OS SS O SAS REAR 
48/0/97 4  RRD NRRDN O SRPT NPR RDPN  R O PCN ceia tore are 
Co. PRODUAL, nestas paso Ts DITA TELEPFONO assassinas casta IT a PD 
Marco con una (X) en el casillero correspondiente la forma de pago que más me conviene. 

[1 tadôn bancario adionioe noniliro HOBEY PRESS SA. LlGianadol NS cics cempssimasesemagenas [] contra reembolso del primer número, junto a la cassette-regoh 
TARJETA DE CREDITO: [.] ERRO ISS suecos 0 MASTER CHARGE N.º... 
cód consta la ia NOUS cio cor ceras cesar = iris 








Franqueo 
Postal 


HOBBY PRESS, S. A. 
Apartado de Correos 
nº 54.062 (Apartados Altos) 


MADRID 


SI NO QUIERE TECLEAR SUS PROGRAM; 


MICROHOBBY LOS GRABA POR USTED: | 





(cortar por esta linea) 


SOLICITUD DE CINTAS DE PROGRAMAS 


Cada mes ponemos a su disposición una cinta con todos los 
programas publicados en los cuatro números de dicho mes. 





Deseo recibir en mi domicilio la(s) cinta(s) que indico a continuación, 
al precio de 550 pts. cada una, más 75 pts. de gastos de envio 
certificado por cada cinta solicitada. 





| ] Números 1 al 4 |] Del 9 al 12 

L] Del5al 8 L] Del 13 al 16 
Rd RS O E ER RS STR DPI RSS DE SR PREMIO 
AE 0 PD PR E DEAN RO DP sí 54 5, 
NES A Decorar nro ISSA PCI SA RS 
18 S/N DAR DEE RR a PR 
CIUDAD canis iris SISTER AC eae RD ii ii aci ir 
Cs: POSTAL. sucasasina vassoura sucacs sua ass 74278 | ED A 
Marco con una (X) en el casillero correspondiente la forma de pago que más me conviene. 
L ] tolón bancario adjunto o nombre HOBBY PRESS, S.A. [Giro Postal NS... |) Contra reembolso 
TARJETA DE CREDITO: [|] ii VASCO essssiassass adere Li] MASTER CHARGE N.º... 
Fecha -de coducidad de la tarjeta ssciscssecssiiscoseisseliciciiieiaseii Firma: 


S NO QUIERE TECLEAR SUS PROGRAMAS, 
MICROHOBBY LOS GRABA POR USTED: 





MADRID 


